Запишите алгоритм нахождения минимума из трех целых чисел а, б, с.

Пример решения на языке Паскаль:

program minfrom3;

var

a, b, c, min: integer;

begin

write ('Введите три числа: ');

readln (a, b, c);

//находим меньшее из a и b

if a < = b then

min : = a

else

min : = b;

//находим меньшее из min и c

if c < min then

min : = c;

writeln ('Минимальное из них: ', min);

readln

end.