===== PascalABC.NET =====
begin
var a, b, c, d: real;
Read(a, b, c, d);
Println(Sqr(Min(Min(a, b), Min(c, d))))
end.
Copyright © 2024 SCHOLAR.TIPS - All rights reserved.
Answers & Comments
===== PascalABC.NET =====
begin
var a, b, c, d: real;
Read(a, b, c, d);
Println(Sqr(Min(Min(a, b), Min(c, d))))
end.