Задача на Паскал за кв. уравнение

[4ervena_roza]

Моля помогнете за следната задача:
Да се състави програма, която изчислява F=Ax²+Bx+7, където x се въвежда от клавиатурата за стойности на А ->3,5,7,9,11 и В->2,3,4,5,6
Благодаря предварително!

[Реклама]

[Chacho]

Това не е квадратно уравнение, а квадратна функция, на която намираш стойностите.

program zad;

var x: real;

function quadr(A,B,x: real): real;
begin
quadr:=A*x*x+B*x+7;
end;

begin

write('x=');
readln(x);
writeln;

writeln('A=3, B=2, F=', quadr(3,2,x):2:0);
writeln('A=5, B=3, F=', quadr(3,2,x):2:0);
writeln('A=7, B=4, F=', quadr(3,2,x):2:0);
writeln('A=9, B=5, F=', quadr(3,2,x):2:0);
writeln('A=11, B=6, F=', quadr(3,2,x):2:0);

readln;
end.