Надо нужно записать программу на языке паскаль найти значение функции y=2a+x² где x принимает значение 1,2,3,4,5. найти 5 значений у

Var   x: integer;   y,a: real; begin   write('введите значение а: '); readln(a);   for x: =1 to 5 do writeln('x=',x,'    y=',2*a+sqr(x)) end. тестовое решение: введите значение а: 1.27 x=1    y=3.54 x=2    y=6.54 x=3    y=11.54 x=4    y=18.54 x=5    y=27.54

A = b * power(c,2)
Вот так.

Не знаб я швлвлвьвшаьвьаоовь

Jejdjbrvdhiowndhcyduei?