Viết chương trình nhập điểm của 2 bạn Khánh và Minh và in ra màn hình kết quả so sánh điểm của hai bạn, chẳng hạn bạn Khánh điểm cao hơn thì in ra màn hình “Ban Khanh cao hon”

2 câu trả lời

program bai_giai;

uses crt;

var khanh,minh:real;

begin

clrscr;

write('nhap diem ban Khanh:');readln(khanh);

write('nhap diem ban Minh:');readln(minh);

if(khanh>minh)then write('ban Khanh cao hon')else write('ban Minh cao hon');

if(khanh=minh)then write('2 ban bang nhau');

readln

end.

uses crt;

var a,b: integer;

begin

clrscr;

writeln('So diem cua Khanh la:'); readln(a);

writeln('So diem cua Minh la:'); readln(b);

if a>b then writeln('Diem cua Khanh cao hon');

if a<b then writeln('Diem cua Minh cao hon');

if a=b then writeln('Diem cua hai ban bang nhau');

readln

end.