Пользователь вводит три числа. Вывести наибольшее из них. Введите число : 1 Введите число : 2
Введите число : 3
Найбольшее : 3 ​

var a,b,c: integer;

begin

writeln('Введите три числа через пробел:');

readln (a,b,c);

if (a>b) and (a>c)  then writeln (a, ' ', '- наибольшее')

else

if (b>a) and (b>c)  then writeln (b, ' ', '- наибольшее')

else

if (c>a) and (c>b)  then writeln (c, ' ', '- наибольшее');

end.