Предмет: Информатика, автор: maria97

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

Ответы

Автор ответа: Архат
0

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. 

  

Интересные вопросы
Предмет: История, автор: dcokdekodek
Предмет: История, автор: nikairvantsova