Ответы
Ответ дал:
0
program nh;
uses
crt;
var
x, y: real;
function fot(x: real) : real;
begin
if (x > 1) then
fot := 1 / (x + 6)
else
fot := 0;
end;
begin
writeln('Введите x:');
readln(x);
y := fot(x);
writeln('F(x) = ', y: 7: 2);
readln;
end.
Вас заинтересует
1 год назад
1 год назад
6 лет назад
8 лет назад