3.5<=ĐTB<5: YẾU
5<=ĐTB<6.5: TB
6.5<=ĐTB<7.5:KHÁ
7.5<=ĐTB<8:GIỎI
8<=ĐTB<9:XS
Quảng cáo
3 câu trả lời 3355
program bai_giai;
uses crt;
var toan,anh,van,dtb:real;
begin
clrscr;
write('nhap diem mon toan, anh, van:');readln(toan, anh, van);
dtb:=(toan+anh+van)/3;
if(dtb>=8)and(dtb<9)then write('xuat sac');
if(dtb>=7)and(dtb<8)then write('gioi');
if(dtb>=6.5)and(dtb<=7.5)then write('kha');
if(dtb>=5)and(dtb<6.5)then write('trung binh');
if(dtb>=3.5)and(dtb<5)then write('yeu');
readln
end.
program bai_giai;
uses crt;
var toan,anh,van,dtb:real;
begin
clrscr;
write('nhap diem mon toan, anh, van:');readln(toan, anh, van);
dtb:=(toan+anh+van)/3;
if(dtb>=8)and(dtb<9)then write('xuat sac');
if(dtb>=7)and(dtb<8)then write('gioi');
if(dtb>=6.5)and(dtb<=7.5)then write('kha');
if(dtb>=5)and(dtb<6.5)then write('trung binh');
if(dtb>=3.5)and(dtb<5)then write('yeu');
readln
end.
program bai_giai;
uses crt;
var toan,anh,van,dtb:real;
begin
clrscr;
write('nhap diem mon toan, anh, van:');readln(toan, anh, van);
dtb:=(toan+anh+van)/3;
if(dtb>=8)and(dtb<9)then write('xuat sac');
if(dtb>=7)and(dtb<8)then write('gioi');
if(dtb>=6.5)and(dtb<=7.5)then write('kha');
if(dtb>=5)and(dtb<6.5)then write('trung binh');
if(dtb>=3.5)and(dtb<5)then write('yeu');
readln
end.
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Hỏi từ APP VIETJACK45477
-
Hỏi từ APP VIETJACK28343
