.
中高生のための
今から始めるプログラミング
ボ、ボクの成績大丈夫かなぁ--解答編
最終更新日:2004/02/11

<<BACK ↑HOME NEXT>>

 1  留年のきわどい成績計算
 
     入力例
 
110 input ko
120 print "国語";ko;"点"
130 input su
140 print "数学";su;"点"
150 input ei
160 print "英語";ei;"点"
170 input sh
180 print "社会";sh;"点"
190 input ri
200 print "理科";ri;"点"
210 print "--------------"
220 let g=ko+su+ei+sh+ri
230 print "合計";g;"点"
240 print "--------------"
250 print "コメント"
260 if g=>300 then
270  print "日ごろの行いをよくすれば助かるかもね"
280 else
290  print "悪い事言わないから来年に懸けなさい"
299 end if
999 end
     出力例@
 
? 60
国語 60 点
? 60
数学 60 点
? 60
英語 60 点
? 60
社会 60 点
? 59
理科 59
--------------
合計 299 点
--------------
コメント
悪い事言わないから来年に懸けなさい
 
     出力例A
 
? 60
国語 60 点
? 60
数学 60 点
? 60
英語 60 点
? 60
社会 60 点
? 60
理科 60 点
--------------
合計 300 点
--------------
コメント
日ごろの行いをよくすれば助かるかもね
 

 2  成績判定プログラム
      入力例
 
110 input ko
120 print "国語";ko;"点"
130 input su
140 print "数学";ko;"点"
150 input ei
160 print "英語";ko;"点"
170 input sh
180 print "社会";ko;"点"
190 input ri
200 print "理科";ko;"点"
210 print "----------"
220 let g=ko+su+ei+sh+ri
230 print "合計";g;"点"
240 print "----------"
250 if g=500 then
260  print "ひょっとしてカンニングした(笑)?"
270 else
280  if g>=450 then
290    print "スゲーよ!"
300  else
310    if g>=400 then
320     print "さすがだねぇ"
330    else
340     if g>=350 then
350       print "やっと射程距離に入れたかな?"
360     else
370       if g>=300 then
380        print "もうひと踏ん張り!ガンバレ!"
390       else
400        print "努力、努力、ひたすら努力。"
495       end if
496     end if
497    end if
498  end if
499 end if
999 end
出力例
 
 
? 70
国語 70 点
? 70
数学 70 点
? 70
英語 70 点
? 36
社会 70 点
? 100
理科 70 点
----------
合計 346 点
----------
もうひと踏ん張り!ガンバレ!
どうですか?難しかったでしょうか?
自分(製作者)が始めて作った時はほんとにテンテコマイでした(^_^;
 
if文に戻る
 

<<BACK ↑HOME NEXT>>

Copyright (C) 2003-2004 Shohei Ohsawa, Naoyan Okada & Fumiya Miyakawa. All rights reserved.