program tinhtb;var toan,ly,hoa,van,su,dia,anh,sinh,CN,nhac,MT,TD,GDCD:real;DTBCM:real; beginwriteln(` nhap vao mon toan`);readln(toan);writeln(` nhap vao mon ly`);readln(ly);writeln(` nhap vao mon hoa`);readln(hoa);writeln(` nhap vao mon van`);readln(van);writeln(` nhap vao mon su`);readln(su);writeln(` nhap vao mon dia`);readln(dia);writeln(` nhap vao mon anh`);readln(anh);writeln(` nhap vao mon sinh`);readln(sinh);writeln(` nhap vao mon CN`);readln(CN);writeln(` nhap vao mon nhac`);readln(nhac);writeln(` nhap vao mon MT`);readln(MT);writeln(` nhap vao mon TD`);readln(TD);writeln(` nhap vao mon GDCD`);readln(GDCD);DTBCM:= (toan*2+ly+hoa+van*2+su+dia+anh+sinh+CN+nhac+MT+GDCD+TD)/15;if( DTBCM>=8) and (toan>=8)and(ly>=6.5)and(hoa>=6.5)and(su>=6.5)and(dia>=6.5) and(anh>=6.5) and(sinh>=6.5)and(CN>=6.5)and(nhac>=6.5)and(MT>=6.5) and(TD>=6.5) and(GDCD>=6.5) and(Van>=6.5) thenbeginwrite(`Xep loai HLgioi`);readln;endelseif( DTBCM>=8) and (van>=8)and(ly>=6.5)and(hoa>=6.5)and(su>=6.5)and(dia>=6.5) and(anh>=6.5) and(sinh>=6.5)and(CN>=6.5)and(nhac>=6.5)and(MT>=6.5) and(TD>=6.5) and(GDCD>=6.5) and(Toan>=6.5) thenbeginwrite(`Xep loai HLgioi`);readln;end elseif( DTBCM>=6.5) and (van>=6.5)and(ly>=5)and(hoa>=5)and(su>=5)and(dia>=5) and(anh>=5) and(sinh>=5)and(CN>=5)and(nhac>=5)and(MT>=5) and(TD>=5) and(GDCD>=5) and(Toan>=5) thenbeginwrite(`Xep loai HLkha`);readln;endelseif( DTBCM>=6.5) and (van>=5)and(ly>=5)and(hoa>=5)and(su>=5)and(dia>=5) and(anh>=5) and(sinh>=5)and(CN>=5)and(nhac>=5)and(MT>=5) and(TD>=5) and(GDCD>=5) and(Toan>=6.5) thenbeginwrite(`Xep loai HLkha`);readln;end elseif( DTBCM>=6.5) and (van>=5)and(ly>=5)and(hoa>=5)and(su>=5)and(dia>=5) and(anh>=5) and(sinh>=5)and(CN>=5)and(nhac>=5)and(MT>=5) and(TD>=5) and(GDCD>=5) and(Toan>=6.5) thenbeginwrite(`Xep loai HLkha`);readln;endelseif( DTBCM>=5) and (van>=5)and(ly>=3.5)and(hoa>=3.5)and(su>=3.5)and(dia>=3.5) and(anh>=3.5) and(sinh>=3.5)and(CN>=3.5)and(nhac>=3.5)and(MT>=3.5) and(TD>=3.5) and(GDCD>=3.5) and(Toan>=3.5) thenbeginwrite(`Xep loai HLtb`);readln;endelseif( DTBCM>=5) and (van>=3.5)and(ly>=3.5)and(hoa>=3.5)and(su>=3.5)and(dia>=3.5) and(anh>=3.5)...