Ответы
Ответ дал:
0
//PascalABC.NET 3.3.5.1644
var c, d, x, y: real;
begin
c := 2;
d := -2.5;
x := 2;
y := ( ( tan(x)/ln(x) ) + (x/c) ) / abs( d * x );
writeln('При x = ', x, ', y = ', y);
x := 3;
y := ( ( tan(x)/ln(x) ) + (x/c) ) / abs( d * x );
writeln('При x = ', x, ', y = ', y);
end.
var c, d, x, y: real;
begin
c := 2;
d := -2.5;
x := 2;
y := ( ( tan(x)/ln(x) ) + (x/c) ) / abs( d * x );
writeln('При x = ', x, ', y = ', y);
x := 3;
y := ( ( tan(x)/ln(x) ) + (x/c) ) / abs( d * x );
writeln('При x = ', x, ', y = ', y);
end.
Вас заинтересует
2 года назад
8 лет назад
8 лет назад