[洛谷1781]宇宙总统

题目来源

www.luogu.org

原网址

http://www.luogu.org/problem/show?pid=1781#

题目背景

宇宙总统竞选

题目描述

地球历公元6036年，全宇宙准备竞选一个最贤能的人当总统，共有n个非凡拔尖的人竟选总统，现在票数已经统计完毕，请你算出谁能够当上总统。

输入输出格式

输入格式：

president.in
第一行为一个整数n,代表竞选总统的人数。
接下来有n行，分别为第一个候选人到第n个候选人的票数。

输出格式：

president.out
共两行，第一行是一个整数m，为当上总统的人的号数。
第二行是当上总统的人的选票。

输入输出样例

输入样例#1：

5
98765
12365
87954
1022356
985678

输出样例#1：

4
1022356

说明

票数可能会很大！！！
n<=20

题解

这题大家第一下看到一定是感到很简单，一个循环就够了。但是要把题目看完，这里面有一个陷

阱，因为是宇宙总统，所以宇宙中的票数肯定是一个超级大的数。所以这个数不能用实型整型存放，而是用字符串。用字符串判断也不难，只要抓住长短，当长短不同时，越长的数就越大；当长短相同时，就可以直接比较了。

提示：虽然 n<=20,但是最好用max来比较，既省时又省空间，是个不错选择。

代码

var

  max:string;

  n,i,j:longint;

  s:ansistring;

begin

  max:='0';

  readln(n);

  for i:=1 to n do

  begin

    readln(s);

    if (s>max)and(length(s)=length(max))or(length(s)>length(max)) then begin max:=s;j:=i;end;

  end;

  writeln(j);

  writeln(max);

end.