Вычистить значение функции y=x^2, x=2, 4, 6, 8, 10. (используя операторы цикла repeat или while)

Для питона
x=2
while x<=10:
(пробел)print('x в квадрате равен', x**2)
(пробел)x+=2

Паскаль:
begin
x:=2;
while x<=10
begin
println('x в квадрате равен ', x*x);
x:=x+2;
end;
end.