Nuasida 4 ноября 2019 в 12:46
Записать формулу для вычисления выражения. Проверить правильность вычислений при заданных численных значениях исходных данных.
Записать формулу для вычисления выражения. Проверить правильность вычислений при заданных численных значениях исходных данных.
// PascalABC.NET
var
x,y,z,v:real;
begin
Write(Задайте z,y,z: );
Read(x,y,z);
v:=(1+Sqr(Sin(x+y)))/Abs(x-2*y/(1+x*x*y*y))*
Power(x,Abs(y))+Sqr(Cos(Arctan(1/z)));
Writeln(v=,v)
end.
Контрольное решение
Задайте z,y,z: 3.74e-2 -0.825 0.16e2
v=1.05533781501548
var
x,y,z,v:real;
begin
Write(Задайте z,y,z: );
Read(x,y,z);
v:=(1+Sqr(Sin(x+y)))/Abs(x-2*y/(1+x*x*y*y))*
Power(x,Abs(y))+Sqr(Cos(Arctan(1/z)));
Writeln(v=,v)
end.
Контрольное решение
Задайте z,y,z: 3.74e-2 -0.825 0.16e2
v=1.05533781501548
Компьютеры и вычисления
191
21
Для комментирования необходимо зарегистрироваться на сайте