Найти значения функции у= х2-7х, при х=5; 4,9; 4,8; 4,7; 4,6; … 0. Паскаль
Answers & Comments
Hasl1337
Var x, y: real; begin x := 5; writeln('x', #9, 'y'); while(x >= 0) do begin write(x:0:1); y := sqr(x) - 7*x; write(#9, y:0:2); x := x - 0.1; writeln; end; end.
Answers & Comments
begin
x := 5;
writeln('x', #9, 'y');
while(x >= 0) do begin
write(x:0:1);
y := sqr(x) - 7*x;
write(#9, y:0:2);
x := x - 0.1;
writeln;
end;
end.