Question

Упростите пожалуйста эту прогу по информатике, работаем в Pascal.
Надо найти минимальное из 3 чисел)

Answer 1

// PascalABC.NET 3.4.2, сборка 1814 от 02.10.2018

// Внимание! Если программа не работает, обновите версию!

begin

 var (a, b, c) := ReadReal3;

 Min(Min(a, b), c).Println

end.

Answer 2

Короче вряд ли напишут, если без последовательностей. А с ними можно: begin ReadSeqReal(3).Min.Println end. - и это все.

Answer 3

Спасибо тебе, чел