
Даны действительные числа А и В. Получить z = arctg(ab)+cos(b).

Var
a,b:real;
begin
Write(Введите a,b: ); Read(a,b);
Writeln(z=,arctan(a*b)+cos(b))
end.
Тестовое решение:
Введите a,b: 0.53 1.3562
z=0.836176098548194
Оцени ответ
Вход
Регистрация
Задать вопрос
Var
a,b:real;
begin
Write(Введите a,b: ); Read(a,b);
Writeln(z=,arctan(a*b)+cos(b))
end.
Тестовое решение:
Введите a,b: 0.53 1.3562
z=0.836176098548194