Контрольное задание №6-1 / 6-1

С помощью while напишите программу вывода всех четных в диапазоне от 2 до 100

Название программы следует после служебного слова program, программа называется chetnie_chisla. После слова var, следует переменная, которая используется в данной программе k: integer. Присваиваем этой переменной тип integer. Программа начинается после слова begin, начинается программа с задания начального значения для переменной k. Далее с помощью цикла while задается максимальное значение переменной k. Теперь следует еще одно слово begin, после которого начинается программа вывода на экран текущего значения переменной k. Командой k:=k+2 задается следующее значение переменной k, которое соответствует следующему четному числу. Далее следует процедура readln, которая переводит курсор на следующую строку, что приводит к выполнению программы с начала. Таким образом программа будет выполняться до тех пор, пока переменная k не достигнет значения 100 включительно.

program chetnie_chisla;

var k:integer;

begin

k:=2;

while k<=100 do

begin

writeln(inttostr(k));

k:=k+2;

end;

readln;

end.