Free Pascal Viết chương trình nhập từ bàn phím biến a,b thực. Thông báo ra màn hình cho biết số nào có giá trị lớn hơn
1 câu trả lời
Program Hotboy;
Uses crt;
Var a,b : real;
Begin
Clrscr;
Write('nhap a');
Readln(a);
Write('nhap b');
Readln(b);
If a>b then write(a,'lon hon ',b)
Else
Write(b,'lon hon ',a);
Readln
End.