Программа Паскаль: вывести все чётные числа первой сотни

begin    for var i:=1 to 100 do   // цикл, которые перебирает целые числа от 1 до 100,

                                      // внутри объявлена переменная - счетчик i       begin           if (i mod 2 = 0) then   // проверяем делится ли число на 2 без остатка              writeln (i);              // если число четное, то выводим его на экран       end;

end.