模拟题1

问题描述

给出n个数，找出这n个数的第二大值，第二小值，平方和。
 

输入格式

第一行为整数n，表示数的个数。(2<=n<=100)
第二行有n个数，为给定的n个数，每个数的绝对值都小于1000。
 

输出格式

输出三行，每行一个整数。第一行表示这些数中的第二大值，第二行表示这些数中的第二小值，第三行表示这些数的平方和。
 

样例输入

5
100 100 -30 30 1
 

样例输出

100
1
21801

skysun原创，转载请注明出处，http://www.cnblogs.com/skysun

View Code

 1 begin
 2   readln(n);
 3   maxa:=-maxlongint+1; max2:=maxa-1;
 4   mina:=maxlongint-1; min2:=mina+1;
 5   for i:=1 to n do
 6     begin
 7       read(a[i]);
 8       sum:=sum+a[i]*a[i];
 9       if a[i]>=maxa then begin max2:=maxa; maxa:=a[i]; end;
10       if (a[i]<maxa) and (a[i]>max2) then max2:=a[i];
11       if a[i]<=mina then begin min2:=mina; mina:=a[i]; end;
12       if (a[i]>mina) and (a[i]<min2) then min2:=a[i];
13     end;
14   writeln(max2); writeln(min2);
15   writeln(sum);
16 end.

此题可以n*n模拟过，又因为求第二大，值不当的打一个第k大的，所以人工打了一个模拟

需要注意的是不能随便continue，并且因为两个变量涉及到赋初值，

所以不能直接采用直接读入a[1]，然后把最值赋成a[1]的方法，

本来想用这个避免一些问题，后来发现，还是传统赋初值方法是正确的。

转载于:https://www.cnblogs.com/skysun/archive/2012/04/02/2429557.html