K
Khách

Hãy nhập câu hỏi của bạn vào đây, nếu là tài khoản VIP, bạn sẽ được ưu tiên trả lời.

19 tháng 12 2018

Var Long, Trang: real;

Begin

Write(‘nhap chieu cao Long =’); readln(Long);

Write(‘nhap chieu cao Trang =’); readln(Trang);

If Long>Trang then writeln(‘Long cao hon Trang’)

else If Long=Trang then write('Long cao bang Trang)

else write('Long thap hon Trang');

readln

end.