program nhiet_do;
uses crt;
var a, b, c, d, e,f, g, tb : real;
begin
clrscr;
write('nhap nhiet do ngày thu hai :'); readln(a);
write('nhap nhiet do ngày thu ba :'); readln(b);
write('nhap nhiet do ngày thu tu :'); readln(c);
write('nhap nhiet do ngày thu nam :'); readln(d);
write('nhap nhiet do ngày thu sau :'); readln(e);
write('nhap nhiet do ngày thu bay :'); readln(f);
write('nhap nhiet do ngày thu chu nhat :'); readln(g);
tb := (a + b + c + d + e + f + g)/7;
writeln('nhiet do trung binh cua tuan la :', tb:8:2);
if a>tb then writeln('thu hai co nhiet do cao hon trung binh tuan.');
if b>tb then writeln('thu ba co nhiet do cao hon trung binh tuan.');
if c>tb then writeln('thu tu co nhiet do cao hon trung binh tuan.');
if d>tb then writeln('thu nam co nhiet do cao hon trung binh tuan.');
if e>tb then writeln('thu sau co nhiet do cao hon trung binh tuan.');
if f>tb then writeln('thu bay co nhiet do cao hon trung binh tuan.');
if g>tb then writeln('thu chu nhat co nhiet do cao hon trung binh tuan.');
readln
end.