Пусть дана произвольная целочисленная матрица порядка 10. Определите, имеются ли среди элементов, расположенных выше
главной диагонали такие, которые превосходят любой из элементов,
расположенных ниже главной диагонали. Укажите индексы этих элементов. На C#

Program chik;
var a:array[1..1000]of integer;
h,i,n,x:integer;
begin
read(n);
h:=0;
for i:=1 to n do
begin
read(a[i]);
end;
read(x);
for i:=1 to n do
begin
if(a[i]=x*x)then h:=h+1;
end;
write(h);
end.
2)
program chik2;
var a,h:integer;
begin
a:=5;
h:=0;
while a<>0 do
begin
read(a);
if(a<0)then h:=h+1;
end;
write(h);
end.
3)program chik3;
var a,h,s,p:real;
begin
a:=5;
h:=0;
while a<>0 do
begin
read(a);
s:=s+a;
h:=h+1;
end;
p:=s/h;
write(p);
end.
4)program chik4;
var n,j,i:longint;
begin
read(n);
for i:=1 to n do
begin
for j:=1 to i do
begin
write(j,' ');
end;
writeln;
end;
end.
 УДАЧИ!

/*
C++ compiler
gcc (Ubuntu 5.2.1-22ubuntu2) 5.2.1 20151010
Copyright (C) 2015 Free Software Foundation, Inc.
*/

#include <iostream>
#include <vector>
using namespace std;

int main()
{
    int count = 0;
    cout <<"Введите количество призывников: ";
    cin >>count;
    if (count>17) count=17;
    vector<int> tanks(count);
    for (unsigned i=0; i<tanks.size(); i++) cin >>tanks[i];
    int min=300, max=0;
    for (unsigned i=0; i<tanks.size(); i++)
    {
        if (min>tanks[i]) min=tanks[i];
        if (max<tanks[i]) max=tanks[i];
    }
    int cnt=0;
    for (unsigned i=0; i<tanks.size(); i++)
    {
        if ((tanks[i]!=min) and (tanks[i]!=max)) cnt++;
    }

    cout <<cnt <<endl;
}