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

используем вспомогательную функцию

и результат функции еще раз применяем для функции

хорошо, спасибо

var  a, b, c: integer;function max(a, b : integer) : integer;begin  if a>b then max:=a  else max:=b;end;begin  readln(a, b, c);  writeln(max(max(a, b),c));end.