Напишите программу, которая вводит три числа и выводит самое больше из них.

var a,b,c,max: integer;

begin

readln(a,b,c);

if a>b then max:=a else max:=b;

if c>max then max:=c;

writeln('max = ',max);

end.

Пример:

12 45 31

max = 45

// PascalABC.NET 3.0, сборка 1157 от 02.02.2016
begin
  var n:=ReadInteger('n=');
  if n<0 then Writeln(n,'! не определено: n<0')
  else
    if n=0 then Writeln('0!=1')
    else begin
      var p:BigInteger:=1;
      for var i:=2 to n do p*=i;
      Writeln(n,'!=',p)
      end
end.

Тестовое решение:
n= 138
138!=691778647261948849222819828311491035886734385827028118707676848307166514238979223884785249055995983385450621636277440066920043595627074569065446040152660143904127838730788278294186615891819670506731208704000000000000000000000000000000000

1. Вкладки  --- H. переключение между ними осуществляется щелчком мыши по их названию, на них размещаются элементы управления

2. Текстовые поля  --- E. служит для ввода последовательности символов

3. Списки  --- F. представляет собой набор значений и выглядит как текстовое поле, снабженное кнопкой с направленной вниз стрелкой

4. Переключатели  --- C. служат для выбора одного из взаимоисключающих вариантов

5. Флажки  --- G. обеспечивают присваивание какому-либо параметру определенного значения и могут располагаться как группами, так и поодиночке

6. Счетчики  --- A. представляет собой пару стрелок, которые позволяют увеличивать или значение в связном с ним поле

7. Ползунки  --- D. позволяет плавно изменять значение какого-либо параметра

8. Командные кнопки  --- B. щелчок по ним обеспечивает выполнение того или иного действия, а надпись на них поясняет назначение