Найти значение функции у=ах2+b, где а, х и b – целые числа.
Program zadanie;
Var y,a,b,x:integer;
Begin
Writeln(Введите три любых целых чисел);
Readln(a,b,x);
y:=a*+b;
Writeln(y=,y);
End.
Оцени ответ
