Вопрос, который вызвал трудности

Входные данные
Вводятся целые числа a и b. Гарантируется, что a не превосходит b

Выходные данные
Выведите (через пробел) все четные числа от a до b (включительно).

Примеры
входные данные
2
5
выходные данные
2 4

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме.

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

Var
a:array[1..100] of integer;
b, c, i: integer;
begin
read(b); read(c);
for i:=b to c do   begin
a[i]:=i;
if a[i] mod 2=0 then 
writeln(a[i], ' ');   end;
end.