Задача 11 Урок 11
Primary tabs
Вывести на экран все числа от 4 до 100 с шагом 4
var i:integer; begin i:=4; while i<=100 do begin write(i,' '); i:=i+4; end; readln end.
- Log in to post comments
- 490 reads
Вывести на экран все числа от 4 до 100 с шагом 4
var i:integer; begin i:=4; while i<=100 do begin write(i,' '); i:=i+4; end; readln end.