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 12/08/2021 Bởi Kennedy 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
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. Bình luận
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.