Урок 10. Задача 1
Primary tabs
Выведите на экран, все четные числа от 35 до 64.
var i: Integer;
begin
for i:=35 to 64 do
if ((i mod 2) = 0) then
write(i, ' ')
end.- Log in to post comments
- 1099 reads
Выведите на экран, все четные числа от 35 до 64.
var i: Integer;
begin
for i:=35 to 64 do
if ((i mod 2) = 0) then
write(i, ' ')
end.