• Решить надо в Free PascalДаны вещественные x, y, z. Вычислить a, b, если

    question img

Ответы 1

  • var

    x,y,z,a,b:real;

    begin

    write ('X = ');readln(x);

    write ('Y = ');readln(y);

    write ('Z = ');readln(z);

    a:=(sqrt(x+y+z)-exp(1/3*ln(x)))/(1+abs(x*x*x-5));

    b:=sqr(cos(1+arctan(1/z)));

    writeln ('A = ',a:0:4);

    writeln ('B = ',b:0:4);

    readln;

    end.

    Только во 2 выражении будет в радианах все считаться

    • Автор:

      flint38
    • 6 лет назад
    • 0
  • Добавить свой ответ

Еще вопросы

Войти через Google

или

Забыли пароль?

У меня нет аккаунта, я хочу Зарегистрироваться

How much to ban the user?
1 hour 1 day 100 years