Вычислить значение функции Y=X^2-5x+8, где X принадлежит интервалу (-5;5). В написать это в программе ПАСКАЛЕ!!!!!
Uses Crt;
var
x,y:real;
begin
ClrScr;
x:=-5;
while x<5 do
begin
y:=sqr(x)-5*x+8;
Writeln(x:3:1,y:7:2);
x:=x+0.1
end;
ReadKey
end.
Оцени ответ
