Вывести на экран 10 чисел с шагом 2
X=37
X=35 и т.д.
Задание сделать в паскале ( остроумные ответы, в которых вы пишите, X=37
X=35
X=33 не принимаются)​

program yhguu;

var

a: integer;

begin

a := 37;

writeln(' 1) ', a - 2, ' 2) ', a - 4, ' 3) ', a - 6, ' 4) ', a - 8, ' 5) ', a - 10, ' 6) ', a - 12, ' 7) ', a - 14, ' 8) ', a - 16, ' 9) ', a - 18, ' 10) ', a - 20);

end.