Даны три целых числа. Вывести на экран наибольшее из трех введенных чисел.

Var a,b,c:integer;BeginWrite('Введите три целых числа: ');ReadLn(a,b,c);if b>a then a:=b;if c>a then a:=c;WriteLn(a);End.