Một số câu lệnh trong chương trình sau viết không đúng, các bạn giúp mik sửa lại cho đúng: thank bạn Program So_Sanh; uses crt var A: B= integer; Begin clrscr; writeln(‘Nhap so A: ’); readln(B); writeln(‘Nhap so B, khac so A: ‘); readln(B); if A > B then; writeln(A,’ lon hon ‘,B) else writeln(B,’ lon hon ‘,A); readln; End.

2 câu trả lời

Gửi bạn ?

program So_sanh;

uses crt;

var a,b: integer;

begin

clrscr;

write('Nhap so A: '); readln(a);

write('nhap so B(khac so A): '); readln(b):

if a>b then writeln(a,' lon hon ',b)

else  write(b,' lon hon ',a);

readln;

end.