
Gema
5 год назад
Нарисать алгоритм нахождения значения функции на Pascal: y=(x2 + 3x -4 )/(x - 7)
ОТВЕТЫ

Fedosij
Oct 24, 2020
Program V;
Var y, x: real;
Begin
writeln(‘значение функции y’);
x:=-4;
while x<=2 do
begin
y:=4*x^2-2*x+3 ;
x:=x+0,5;
writeln(y:16:4);
end;
End.
Var y, x: real;
Begin
writeln(‘значение функции y’);
x:=-4;
while x<=2 do
begin
y:=4*x^2-2*x+3 ;
x:=x+0,5;
writeln(y:16:4);
end;
End.
50