Viết chương trình Pascal nhập điểm Toán, Lí và Hóa từ bàn phím. Tính trung bình cộng điểm 3 môn đó. Nếu điểm trung bình lớn hơn hoặc bằng 8 thì in ra màn hình câu "Chúc mừng bạn".
2 câu trả lời
program sk;
uses crt;
var a, b, c, tb : real;
begin
clrscr;
write('nhap diem toan :');readln(a);
write('nhap diem li :');readln(b);
write('nhap diem hoa :');readln(c);
tb := (a + b + c)/3;
writeln('diem trung binh ba mon la :', tb:4:2);
if tb >= 8 then writeln('Chuc mung ban');
readln
end.
uses crt;
var t,l,h:real;
begin
clrscr;
write('Nhap diem toan li hoa: ');readln(t,l,h);
if (t+l+h)/3>8 then writeln('Chuc mung ban');
readln
end.