10 A$="" 20 input "あれれ、にょんさんの誕生日だったんですか? (y/n)",A$ 30 If A$="Y" or A$="y" then goto 40 else goto 90 40 print "おめでとう!十の位が(以下略)" 90 end