Ответы
Ответ дал:
0
PascalABC.NET 3.3
1.
var c,d,x,y: real;
begin
c:=10; d:=-9;
readln(x);
y:=tan(x)*log10(abs(d+x))/(sqrt(c*x)+d);
writeln('y = ',y:7:5);
end.
Пример:
2.2
y = 0.26539
2.
var c,d,x,y: real;
begin
c:=5; d:=6;
readln(x);
y:=sqrt(sqr(x*c)+d)/(power(c,0.16)-log10(abs(d*x)));
writeln('y = ',y:7:5);
end.
Пример:
-4
y = -232.92427
1.
var c,d,x,y: real;
begin
c:=10; d:=-9;
readln(x);
y:=tan(x)*log10(abs(d+x))/(sqrt(c*x)+d);
writeln('y = ',y:7:5);
end.
Пример:
2.2
y = 0.26539
2.
var c,d,x,y: real;
begin
c:=5; d:=6;
readln(x);
y:=sqrt(sqr(x*c)+d)/(power(c,0.16)-log10(abs(d*x)));
writeln('y = ',y:7:5);
end.
Пример:
-4
y = -232.92427
Ответ дал:
0
У вас, по-моему ошибка. (power(c,0.16), там не 0.16 а 0.1*d
Ответ дал:
0
Может быть. Плохо видно.
Ответ дал:
0
// PascalABC.NET 3.3
// Cборка 1590 от 03.12.2017
1)
begin
var (c,d,x):=ReadReal3('Введите c,d,x-> ');
Writeln( 'y= ',(sin(x)/cos(x))*(ln(abs(d+x))/(sqrt(c*x)+d)):0:3);
end.
2)
begin
var (c,d,x):=ReadReal3('Введите c,d,x-> ');
Writeln( 'y= ',sqrt(sqr(x*c)+d)/(power(c,0.1*d)-ln(abs(d*x))):0:3);
end.
// Cборка 1590 от 03.12.2017
1)
begin
var (c,d,x):=ReadReal3('Введите c,d,x-> ');
Writeln( 'y= ',(sin(x)/cos(x))*(ln(abs(d+x))/(sqrt(c*x)+d)):0:3);
end.
2)
begin
var (c,d,x):=ReadReal3('Введите c,d,x-> ');
Writeln( 'y= ',sqrt(sqr(x*c)+d)/(power(c,0.1*d)-ln(abs(d*x))):0:3);
end.
Вас заинтересует
1 год назад
1 год назад
2 года назад
8 лет назад
8 лет назад
8 лет назад