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

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

program minfrom3;

var
    a, b, c, min: integer; 

begin
   write (Введите три числа: );
   readln (a, b, c);
   //обретаем наименьшее из a и b
   if a lt;= b then
      min := a 
  else
      min := b; 
  //находим наименьшее из min и c
  if c lt; min then
    min := c;

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

readln
end.