Вычисления в одномерном массиве , состоящем из N вещественных элементов

//Вывод одномерного вещ. массива и вычисление его среднего значения
#include <conio.h>//для  getch
#include <iostream.h>//для cout и cin
void main ()
{
const n=5;
int i; double A[n], SA;
cout<<"\nBorland C++ 3.1\n";
cout<<"\nSrerednee znachenie massiva\n";
cout<<"\nVvedite chisla:\n";
for (i=0; i<n; i++)
{
cout<<"A["<<i<<"]=";cin>>A[i];
}
SA=0;
for (i=0;i<n; i++)
SA=SA+A[i];
SA=SA/n;
cout<<"Srerednee znachenie massiva= "<<SA;
getch();
}

#include <iomanip.h>
#include <conio.h>
#include <iostream.h>
int main()
{
int i,j,IminA,JminA,ImaxA,JmaxA,A[5][7];
clrscr();
randomize();
cout<<"Borland C++ ver.3.1";
cout<<"\nProgramma poiska min. i max. elementov v MATRIX.\n";
//заполняем матрицу случайными числами
for (i=0; i<20; i++)
{
for (j=0; j<20; j++)
{
A[i][j]=rand()%100;
cout<<setw(21)<<A[i][j];
}
cout<<endl;
}
//поиск минимального значения
IminA=JminA=0;
for (i=0; i<20; i++)
{
for (j=0; j<20; j++)
if (A[i][j]<A[IminA][JminA])
{
IminA=i;JminA=j;
}
}
//поиск максимального значения
{
ImaxA=JmaxA=0;
for (i=0; i<20; i++)
{
for (j=0; j<20; j++)
if (A[i][j]>A[ImaxA][JmaxA])
{
ImaxA=i;JmaxA=j;
}
}
//выводим значения на экран
cout<<"Stroka["<<IminA+1<<"] Stolbets["<<JminA+1<<"] Minimal="
<<A[IminA][JminA];
cout<<endl;
}
cout<<"Stroka["<<ImaxA+1<<"] Stolbets["<<JmaxA+1<<"] Maximal="
<<A[ImaxA][JmaxA];
getch();
return 0;
}