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

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

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.