• составить программу в Паскале! 9 класс! СРОЧНО!!! Даны вещественные числа х и у, не равные друг другу. Меньшее из этих двух чисел заменить половиной их суммы, а большее — их удвоенным произведением.

Ответы 1

  • program mar;

      var x,y:real

      

    Begin

      x:=30;  y:=10  

      y:=(x+y)\2:

      x:=2*x*(x-y);

      writeln (x,y);

      readln;

    End. 

      

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

Войти через Google

или

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

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

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