|
zadach85.BAS |
|
{* Задача85 *}REM basic ' В простую переменную последовательно вводятся N вещественных чисел. Вычислить максимальное значение.10 INPUT "Сколько чисел в последовательности?"; N%
30 INPUT "Первое число ="; MAX
40 For I = 2 To N%
50 INPUT "Очередное число"; X
60 If X >= MAX Then MAX = X
70 Next I
80 PRINT "MAX ="; MAX
90 End
|