Ответы 2

  • var a, b, c, z, out: real;begin writeln("Введите a, b, c, z: "); readln(a, b, c, z); out := z * z * z * z + 4 * a * b / (c * c); writeln("Равно: ", out);end.
  • // PascalABC.NET 3.4.2, сборка 1785 от 06.09.2018

    // Внимание! Если программа не работает, обновите версию!

    begin

     var a, b, c, z: real;

     Print('Введите через пробел a, b, c, z:');

     Read(a, b, c, z);

     Print(z ** 4 + 4 * a * b / Sqr(c))

    end.

    answer img
  • Добавить свой ответ

Войти через Google

или

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

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

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