Написать программу для : из введённых с клавиатуры 3-х чисел вывести на экран наибольшее. (использовать условный оператор) , нужно и

Var a,b,c:integer;
begin
read(a,b,c);
if (a>b) and (a>c) then writeln(a);
if (b>a) and (b>c) then writeln(b);
if (c>a) and (c>b) then writeln(c);
end.