応用編。 RESTORE @CHARA FOR I=0 TO 3 READ A$,B$:PRINT A$;"は、";B$;"へ いきます" NEXT DATA "あに","ほんや","おとうと","とこや","いもうと","としょかん","あね","コンビニ" READで読むデータを2つ設定すると、データも2つを1セットにして読みこみます。3つ以上も出来ますよ。