program u33;
var max,a,b,c:integer;
begin
write('the first of the three numbers of which to take the maximum is ');
read(a);
write('the second of the three numbers of which to take the maximum is ');
read(b);
write('the third of the three numbers of which to take the maximum is ');
read(c);
if a<=b then begin
if b<=c then begin
max:=c;
end
else
if b>=c then begin
max:=b
end;
end
else
if a>=b then begin
if a<=c then begin
max:=c;
end
else
if a>=c then begin
max:=a;
end;
end;
write('the maximum is ',max);
writeln;
end.