Срочно. Выведите все четные числа в диапазоне от 0 до 100. Программа - Паскаль. Чем...

0 голосов
92 просмотров

Срочно. Выведите все четные числа в диапазоне от 0 до 100. Программа - Паскаль. Чем проще, тем лучше. Программа должна работать.


Информатика (1.0k баллов) | 92 просмотров
Дан 1 ответ
0 голосов

var i: integer;

begin  

for i:=0 to 100 do

if i mod 2 = 0 then write(i,' ');

end.

(1.2k баллов)
0

then write(i,' ');

0

что это значит?

0

Вывод каждого значения i. То, что в одиночных скобках, просто пробел, чтобы выведенные цифры не слиплись