Помогите пожалуйста решить срочно!
Даны значения переменных а и b, найти сумму и произведение их корней, частное и разность их квадратов.
Даны значения переменных а и b, найти сумму и произведение их корней, частное и разность их квадратов.
More Questions From This User See All
Answers & Comments
===== 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.