Упростите пожалуйста эту прогу по информатике, работаем в Pascal. Надо найти минимальное из 3 чисел)
begin
var (a, b, c) := ReadReal3;
Min(Min(a, b), c).Println
end.
Короче вряд ли напишут, если без последовательностей. А с ними можно: begin ReadSeqReal(3).Min.Println end. - и это все.
Спасибо тебе, чел