program so_nao_lon_nhat;
uses crt;
var:a,b,c:integer;
begin
clrscr;
writeln('moi ban nhap a:');
readln(a);
writeln('moi ban nhap b:');
readln(b);
writeln('moi ban nhap c');
readln(c);
a:=max;
if b>a then b=max;
if c>b then c=max;
writeln('so lon nhat la:' ,max);
readln;
end.
XIN HAY NHẤT