Составить программу с процедурой, которая находит минимальное значение из 3 чисел

Question

Информатика

Степаша

18 октября, 01:50

Составить программу с процедурой, которая находит минимальное значение из 3 чисел

+1

Ответы (1)

Знаете ответ на вопрос?

Идея · Answer 1

Var a, b, c : Integer;

Function Min (aa, bb : Integer) : Integer;

Begin

If aa
end;

Begin

Write ('Введите три числа: ') ; Readln (a, b, c) ;

Writeln ('Минимальное число: ', Min (Min (a, b), c)) ;

end.