Question

mọi người giúp mình với :

viết phương trình nhập vào từ bàn phím điểm các môn Toán Lý Hóa Văn Sử Địa . Tính giá trị trung bình và xét học lực cho đối tượng.

cứu mình mai mình học rồi

Answer 1

uses crt;

Var t,l,h,v,s,d,tb: real;

begin

Write ('Diem Toan: '); readln (t);

Write ('Diem Ly: '); readln (l);

Write ('Diem Hoa: '); readln (h);

Write ('Diem Van: '); readln (v);

Write ('Diem Su: '); readln (s);

Write ('Diem Dia: '); readln (d);

Tb:=(t + l + h + v + s + d)/6;

Writeln('Diem trung binh: ',tb);

readln;

end.

Answer 2

Xét học lực thì bạn phải đưa ra thang điểm để xét học lực tốt, khá...

Answer 3

program hoc24h:

uses crt;

var a,b,c,d,e,f,dtb: real;

begin

clrscr;

writeln('nhap diem toan ly hoa su dia van:'); readln(a,b,c,d,e,f);

dtb:= (a+b+c+d+e+f)/6;

writeln(' diem trung binh la:',dtb:6:2);

if dtb<5 then writeln(' loai kem:');

if (5<=dtb) and ( dtb<7) then writeln('loai trung binh:');

if (7<=dtb) and (dtb<9) then writeln(' loai kha:');

if dtb>9 then writeln('loai gioi:');

readln;

end.