program co_robi_3;
var m, a, b, c: integer;
begin
write('Zadaj postupne 3 cele cisla: ');
readln(a, b, c);
if a > b then
m:=a
else
m:=b;
if c > m then m:=c;
writeln('Z tvojich ciselje to spravne cislo ',m);
readln;
end.