uses crt;
var a,b,c,t:int64;
begin
clrscr;
write('nhap so tien chi tieu trong thang 8:'); readln(a);
write('nhap so tien chi tieu trong thang 9:'); readln(b);
write('nhap so tien chi tieu trong thang 10:'); readln(c);
t:=a+b+c;
writeln('tong so tien chi tieu trong 3 thang la: ',t);
if t>=15000000 then writeln('qua nhieu')
else writeln('khong nhieu');
readln;
end.