Предыдущая публикация
10 REM p1
20 REM Язык GW-Basic
30 REM Живи, Бейсик!
40 REM No input
50 DIM A, B, C
60 DIM D, E
100 REM 171.1.1
110 PRINT "1. Здравствуй, мир!"
120 REM 177.1.2
130 A = 65
140 PRINT "2." A
150 REM 182.2.3
160 A = 3: B = 2
170 A = A + 1: B = B + 1: C = A * B
180 PRINT "3." A B C
190 REM 185.1.4
200 A = 1: B = 2: C = A / B
210 PRINT "4." C
220 REM 188.1.5
230 A = 1: B = 1: C = 1: D = 1
240 E = A * 2 + (B - .5) + (C + D) - 7
250 PRINT "5. " E
260 REM 193.1.6
270 A = 84.3: B = -12: C = 32.15
280 PRINT "6." A B C
290 REM 42.1.7
300 A = 1996
310 PRINT "7. Сейчас" A "год."
320 REM 47.5.8
330 A = 5
340 B = 2 * 3.1415926# * A
350 PRINT "8. Длина окружности радиуса" A "равна" B
360 REM 54.8.9
370 A = 60000!
380 B = A
390 PRINT "9. a =" A ", b =" B
400 REM 68.11.10
410 A = 5: B = 60
420 A = A + 1: B = B + 1
430 PRINT "10. a =" A ", b =" B
440 PRINT A + 1 B + 1
450 REM 69.12.11
460 A = 101 <= 105
470 B = 101 > 105
480 PRINT "11. true: " A ", false: " B
490 REM 80.1.12
500 FOR A = 1 TO 10000
510 NEXT
520 END
Следующая публикация
Нет комментариев