b)
program tim _so_lon_nhat;
uses crt;
var a, b, c: integer;
Begin 
write ("Nhap so nguyen a = "); readln(a); 
write ("Nhap so nguyen b = "); readln(b); 
write ("Nhap so nguyen c = "); readln(c); 
max:=a; 
if max < b then max:=b; 
if max < c then max:=c; 
writeln ("So lon nhat trong 3 so la :",max); 
readln; 
End.