1 2 3 4 5 6 7 8 | CLS: DIM max FOR ch = 1 TO 10 PRINT "Vvedite chislo"; ch; ": "; INPUT "", c IF ch = 1 THEN max = c IF c > max THEN max = c NEXT PRINT "max:"; max |
Тестирование выполнено в программе QB64 ( Скачать )