Question

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

Answer 1

var i: integer;  // задаём целочисленную переменную для цикла

begin // начало программы

for i:=0 to 100 do  // цикл чисел от 0 до 100

if i mod 2 = 0 then write(i,' ');  // проверка числа на чётность с последующем выводом подходящего числа и отсеиванием нечётных чисел

end. // конец программы