Yêu cầu: Cho biết điểm kiểm tra Tin học của 1 em học sinh (2 con điểm hệ số 1, 1 con điểm hệ số 2, 1 con điểm hệ số 3). In ra Kết quả học tập môn Tin học của em đó. Nếu điểm tổng kết >=8 đạt kết quả Giỏi, <8 và >=6,5 đạt kết quả Khá, <6,5 và >=5 đạt kết quả Trung Bình, <5 đạt kết quả Yếu. giúp với ạ cần gấp hứa 5*
2 câu trả lời
Nếu có sai thì bạn nói mình nhé.
==========================
program Hello;
uses crt;
var a1,a2,a3,a4,a5:real;
begin
clrscr;
read(a1, a2, a3, a4);
a5:= (a1+a2+a3*2+a4*3)/7;
if a5 >= 8 then
Write('Gioi')
else if (a5>=6.5) and (a5<8) then
Write('Kha')
else if (a5>=5) and (a5<6.5) then
Write('TB')
else
Write('Yeu');
readln;
end.
uses crt;
var d,a1,a2,a3,a4:real;
begin
clrscr;
readln(a1, a2, a3, a4);
d:= (a1+a2+a3*2+a4*3)/7;
if d >= 8 then
Writeln('Gioi')
else if (d>=6.5) and (d<8) then
Writeln('Kha')
else if (d>=5) and (d<6.5) then
Writeln('Trung binh')
else
Writeln('Yeu');
readln;
end.
