program max_abc;
var a, b, c, max: integer;
Begin
         writeln(‘Nhap 3 so bat ky’);
          readln(a, b, c);
          max : =  a;
  if  (b < c) and (max < c) then max := c;
if (b > c) and (max < b) then max := b;
          Writeln(‘So lon nhat: ’,max);
Readln;
End.