Даны четыре числа. Найти наименьшее число из данных. Программирование

Question

Даны четыре числа. Найти наименьшее число из данных. Программирование

Answer 1

//PascalABC.NET
//Версия 3.3, сборка 1634
begin
write(min(min(ReadReal,ReadReal),min(ReadReal,ReadReal)));
end.