Trong kì thi tuyển sinh lớp 9 lên lớp 10. học sinh lớp 9 phải thi 2 môn là Toán và Ngữ Văn. Các em hãy viết chương trình máy tính để hôc trợ thầy cô trong công tác tuyển sinh thực hiện 1 số công việc sau:
a) Viết chương trình nhập vào 2 điểm Toán và Văn của 1 học sinh.
b) Hãy tính và in ra màn hình điểm trung bình của học sinh với yêu cầu sau: Toán hệ số 2, Văn hệ số 1.
c) Hãy in ra màn hình thông báo theo yêu cầu sau: nếu diểm trung bình của học sinh >=5 thì in ra màn hình " KET QUA:DAU" ngược lại in ra màn hình "KET QUA: HONG".
GIÚP MÌNH VỚI Ạ! SẮP THI RỒI =((
Program Xet_tuyen;
Uses crt;
Var a,b,S: real;
Begin
clrscr;
writeln('Nhap vao diem Toan cua hoc sinh do:'); readln(a);
writeln('Nhap vao diem Van cua hoc sinh do:'); readln(b);
S:=(a*2+b)/3;
writeln('Diem trung binh 2 mon Toan va Van cua ban do la:',S:2:1);
if S>=5 then writeln('KET QUA:DAU')
else writeln('KET QUA:HONG');
readln
End.