Cho ba môn Toán, Anh, Văn viết chương trình tính tổng điểm trên 25 thì trúng tuyển

2 câu trả lời

program bai_giai;

uses crt;

var t,a,v, s:real;

begin

clrscr;

write('nhap diem 3 mon toan, anh, van:');readln(a,b,c);

s:=a+b+c;

if(s>25)then write('trung tuyen')else write('rot roi');

readln;

end.

Bạn tham khảo!