パターン１ a$="アッポー" b$="ペン" print a$; wait 60 print b$ パターン２ for i=0 to 3:read a$:print a$;:wait 60:next data "ペン","パイナッポー","アッポー","ペン" wait 60で約1秒待ちます。