оператор while

[tim777777]

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

[Лунатик222]

Сообщение от tim777777

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

 a:=2;
 while a<=100 do
  begin 
    write(a, ' ');
    a:=a+2;   
  end;

либо

 while a<100 do
  begin 
    a:=a+2;    
    write(a, ' ');
  end;

[Sazary]

И в чем проблема?
проверка на четность:

if i mod 2 = 0 then 
 { i - четное }

[tim777777]

пасиба...........