おーしマロがN88BASICでクソースを出そうじゃないか

10 input "国語";kokugo:input "数学";suugaku:input "理科";rika
20 heikin=(kokugo+suugaku+rika)/3.0
30 print "平均=";heikin
40 if heikin >90 then print "評価はAじゃ" :end
50 if heikin >80 then print "評価はBじゃ":end
60 if heikin >70 then print "評価はCじゃ":end
70 print "追試じゃ"