1)Viết chương trình tính điểm trung bình 3 môn (Toán, Văn, Anh, Tin) theo hệ số (2:2:1:1) sau đó xếp loại như sau: Loại: ĐTB >= 8.0 và không có môn nào dưới 6.5Loại Khá : 6.5=<ĐTB < 8.0 và không có môn nào dưới 5Loại Trung bình : 5.0 =<ĐTB < 6.5 và không có môn dưới 3.5 Loại yếu: còn lại
1)Viết chương trình tính điểm trung bình 3 môn (Toán, Văn, Anh, Tin) theo hệ số (2:2:1:1) sau đó xếp loại như sau: Loại: ĐTB >= 8.0 và không có môn nà
By Valentina
uses crt;
Var a,b,c,d,dt:real;
begin
clrscr;
write(‘Diem mon toan cua ban: ‘);readln(a);
write(‘Diem mon van cua ban: ‘);readln(b);
write(‘Diem mon anh van cua ban: ‘);readln(c);
write(‘Diem mon tin hoc cua ban: ‘);readln(d);
Dt:=(a*2+b*2+c+b)/6;
if(dt>=8)and(a>=6.5)and(b>=6.5)and(c>=6.5)and(d>=6.5)
then writeln(‘Ban dat loai gioi.’) else
if(dt>=6.5)and(dt<8)and(a>=5)and(b>=5)and(c>=5)and(d>=5)
then writeln(‘Ban dat loai kha.’) else
if(dt>=5)and(dt<6.5)and(a>=3.5)and(b>=3.5)and(c>=3.5)and(d>=3.5)
then writeln(‘Ban dat loai trung binh.’) else writeln(‘Ban dat loai yeu.’);
readln
end.
Viết chương trình nhập họ tên, điểm trung bình học kì 1( ĐTB học kì 1 ) và điểm trung bình học kì 2
( ĐTB học kì 2 ) kiểu số thực cho 1 người. Tính điểm trung bình cả năm theo công thức sau:
Trung bình cả năm:
( ĐTB cả năm ) = (ĐTB học kì 1 ) + (ĐTB học kì 2 )/3
Sau đó phân loại như sau:
ĐTB cả năm < 5,0: loại yếu
5,0 < ĐTB cả năm < 6,5: loại trung bình
6,5 < ĐTB cả năm < 8,0: loại khá
ĐTB cả năm > 8,0: loại giỏi
In họ và tên, kết quả học tập của người đó ra màn hình.