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

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