Bài 1: 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');
if(khanh=minh)then write('2 ban bang nhau');
readln
end.
program bai_Giai;
uses crt;
var minh, khanh:longint;
begin
clrscr;
write('nhap chieu cao ban khanh');readln(khanh);
write('nhap chieu cao ban Minh');readln(minh);
if(khanh>minh)then write('ban Minh cao hon')else write('ban Khanh cao hon');
if(khanh=minh)then write('hai ban bang');
readln
end.