Noip2004P1 不高兴的津津

题目：	不高兴的津津
来源：	Noip2004P1
题目大意：	7对数，输出相加大于8且最大的数的下标，如果没有则输出0
数据范围：
样例：	5 3  6 2  7 2  5 3  5 4  0 4  0 6	3
做题思路：	模拟，找比8大的，然后打擂台，先把ans初始为8这样只需要打擂台不需要找比8大  的了。
知识点：	模拟

var
 x,y,i,max,ans:longint;
begin
 max:=8;ans:=0;
 fori:=1 to 7 do
  begin
  readln(x,y);
   ifx+y>max then
   begin
    max:=x+y;
    ans:=i;
   end;
  end;
 writeln(ans);
end.

题目来源： http://yuanti.tyvj.cn:8080/Problem_Show.asp?id=1042