Программа которая выводит ряд чисел от 5 до 50 с шагом изменения 2

Question

Программа которая выводит ряд чисел от 5 до 50 с шагом изменения 2

Comments

Программа должна быть в Paskal

Answer 1

Var
   A:integer;
Begin
A:=5;
Repeat
Write(A,' ');
A:=A+2;
Until A>=50;
End.