Program Pr1;uses crt;var a,b,c,max:integer;beginclrscr;readln(a,b,c);if a>b then max:=aelse max:=b;if c>max then max:=c;writeln(max);end.
Program Pr1;
uses crt;
var a,b,c,max:integer;
begin
clrscr;
readln(a,b,c);
if a>b then max:=a
else max:=b;
if c>max then max:=c;
writeln(max);
end.