Дано натуральное число n и вещественная матрица размера n X 9 . Плиз помогите(

Как и у Shadow Live, программа тоже для платформы .NET и тоже на языке с си-подобным синтаксисом:

using System;
using System.Console;

module N74485772
{
Main(): void
{
def rand = Random();
Write("Введите кол-во строк (n): ");
def n = int.Parse(ReadLine());
def a = array(n, 9);
WriteLine("Матрица {0} x 9:", n);
for (mutable i = 0; i < n; i++)
{
for (mutable j = 0; j < 9; j++)
{
a[i, j] = rand.NextDouble() * 100 - 50;
Write("{0, 8:F3}", a[i, j])
}
WriteLine();
}
WriteLine("Средние арифметические значения элементов столбцов: ");
for (mutable j = 0; j < 9; j++)
{
mutable s = 0.0;
for (mutable i = 0; i < n; i++)
s += a[i, j];
Write("{0, 8:F3}", s / n);
}
_ = ReadKey();
}
}

А так же тоже для .NET, но на языке с алголо-подобным синтаксисом:

module N74485772;
import System, System.Console as cio;

type
TMatrix = array *, * of real{64};
var
rand: System.Random;
a: TMatrix;
i, j, n: integer{32};
s: real{64};
begin
rand := new System.Random;
cio.Write("Введите кол-во строк (n): ");
n := System.Int32.Parse(cio.ReadLine());
a := new TMatrix(n, 9);
cio.WriteLine("Матрица {0} x 9:", n);
for i := 0 to n - 1 do
for j := 0 to 8 do
a[i, j] := rand.NextDouble() * 100 - 50;
cio.Write("{0, 8:F3}", a[i, j])
end;
cio.WriteLine
end;
cio.WriteLine("Средние арифметические значения элементов столбцов: ");
for j := 0 to 8 do
s := 0.0;
for i := 0 to n - 1 do
s := s + a[i, j]
end;
cio.Write("{0, 8:F3}", s / n)
end;
cio.ReadKey
end N74485772.

Выбирайте.
Скриншоты обеих программ одинаковые:



P.S. Shadow Live, не стесняйтесь ставить пробелы, Ответы перестанут уродовать код программы.

100 рублей

за 30 рублей сделаю

Укажите язык программирования.

using System;
using System.Collections.Generic;
using System.Linq;
using System.Text;

namespace ConsoleApplication1
{
class Program
{
static void Main(string[] args)
{
Console.Write("Enter N:");
int N = Convert.ToInt16(Console.ReadLine());
int[,] A = new int[N, 9];
Single[] s = new Single[9];

for (int i = 0; i < 9; i++)
{
s = 0;
for (int j = 0; j < N; j++)
{
Console.Write("A[" + j.ToString() + "][" + i.ToString() + "]=");
A[j, i] = Convert.ToInt16(Console.ReadLine());
}
}
for (int i = 0; i < 9; i++)
for (int j = 0; j < N; j++)
s += A[j, i];

for(int i=0;i<9;i++)
{
s /= N;
Console.Write(s + " ");
}
Console.ReadKey();
}
}
}
на сколько я понял - 9 столбцов и неизвестно сколько строк.. . вот вам C#.