100 REM --------------------- 110 REM rating Program by Dai Fukuoka 120 REM (C)電脳組 130 REM --------------------- 140 CONSOLE 0,25,0,1:SCREEN 3,0,0,1:WIDTH 80,25:COLOR 0,7,0,0,1:CLS 3 150 *START 160 INPUT "レーティング査定を入力してください:",RATO 170 INPUT "単価を入力してください:",COST 180 INPUT "量を入力してください:",MUTCH 190 IF RATO<1 THEN *START 200 A=(COST*MUTCH)/RATO 210 PRINT "答えは:";A 220 GOTO *START