нужно как записать на языке паскаль найдите значение функции y=2a+x2 где x принимает значения 12345 нужно найти 5 значений y

Что-то вроде этого
var i, y: integer;  
begin
for i := 1 to 5 do 
begin
y := 2*i + i*i;
write ('y= ',y);
end;  
readln end.