Решение 1 Задача 2 Урок 12.2
Primary tabs
У вас есть программа, использующая цикл while:
var i: integer; begin i:=1; while i<=100 do begin write(i, ' '); i:=i+5; end; readln(); end.Перепешите её с помощью цикла repeat/until
var i: integer; begin i:=1; repeat write(i, ' '); i:=i+5; until(i > 100); readln(); end.
КОНСОЛЬ
1 6 11 16 21 26 31 36 41 46 51 56 61 66 71 76 81 86 91 96
- Log in to post comments
- 706 reads