Записать в квадрате числа от 1 до 10 с промежутком в 2. (написать программу для вычисления в pascal.)

Записать в квадрате числа от 1 до 10 с промежутком в 2.(написать программу для вычисления в pascal.) Программу записал, но не понимаю, как добавить промежуток?

program smart;

var x,y:integer;

begin

for y:=1 to 10 do begin

x:=y*y;

writeln('',x);

end;

end.

fgrtyrrrrty    3   24.12.2020 15:05    14