program xeploai;
Use crt;
var dtb:real;
begin
crlscr;
write('nhap diem trung binh:');
readln(dtb);
if dtb<5.0 then writeln('xep loai yeu');
else if (dtb>=5.0)and(dtb<6.5) then writeln('xep loai trung binh');
else if (dtb>=6.5)and(dtb<8.0) then writeln('xep loai kha');
else writeln('xep loao gioi');
Readln;
End.
Quảng cáo
1 câu trả lời 155
Quảng cáo
Bạn cần hỏi gì?
Câu hỏi hot cùng chủ đề
-
Đã trả lời bởi chuyên gia
19755 -
Đã trả lời bởi chuyên gia
11117 -
11096
-
Đã trả lời bởi chuyên gia
11010 -
Đã trả lời bởi chuyên gia
8735 -
Đã trả lời bởi chuyên gia
7671 -
Đã trả lời bởi chuyên gia
7385 -
Đã trả lời bởi chuyên gia
7337
Gửi báo cáo thành công!
