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