Question

напишите программу которая вычисляет квадрат наименьшего из четырех чисел срочно

Answer 1

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

begin

 var a, b, c, d: real;

 Read(a, b, c, d);

 Println(Sqr(Min(Min(a, b), Min(c, d))))

end.