Решить !
даны значения переменных а и b, найти сумму и произведение их корней, частное и разность их квадратов. ​

teaonline teaonline    2   22.01.2020 07:12    0

Ответы
Алина06072003 Алина06072003  11.10.2020 02:21

===== PascalABC.NET =====

begin

 var (a, b) := ReadReal2;

 var (x, y) := (Sqrt(a), Sqrt(b));

 Println('Сумма и произведение корней:', x + y, x * y);

 (x, y) := (a*a, b*b);

 Print('Частное и разность квадратов:', x/y, x - y)

end.


Решить ! даны значения переменных а и b, найти сумму и произведение их корней, частное и разность их
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика