Получить одномерный массив,состоящий из средних арифметических значений элементов строк матрицы.

@Mari04 · Регистрация: 04.03.2010

Студворк — интернет-сервис помощи студентам

Народ,помогите пожалуйста составить программу и блок-схему к ней.
Дана квадратная матрица.Получить одномерный массив,состоящий из средних арифметических значений элементов строк матрицы.Получить одномерный массив,отсортировать в порядке возрастания элементов.Вывести:
-матрицу
-одномерный массив до сортировки
-после сортировки

Решить двумя способами.

@Unrealler · 23.03.2010, 21:10

Pascal

uses crt;
var
   a:array[1..100,1..100] of integer;
   b:array[1..100] of real;
   i,j,n,m,s:integer;
   r:real;
begin
clrscr;
write('Ââåäèòå êîëè÷åñòâî ñòðîê=');
readln(n);
write('Ââåäèòå êîëè÷åñòâî ñòîëáöîâ=');
readln(m);
writeln('Èñõîäíàÿ ìàòðèöà');
randomize;
for i:=1 to n do
 begin
  s:=0;
  for j:=1 to m do
   begin
    a[i,j]:=random(51);
    write(a[i,j],' ');
    s:=s+a[i,j];
   end;
  b[i]:=s/m;
  s:=0;
  writeln;
 end;
writeln('Ìàññèâ');
for i:=1 to n do
 write(b[i]:7:2);
writeln;
writeln('Îòñîðòèðîâàííûé ìàññèâ');
for i:=1 to n-1 do
 for j:=1 to n-i do
  if (b[j]>=b[j+1]) then
   begin
    r:=b[j];
    b[j]:=b[j+1];
    b[j+1]:=r;
   end;
for i:=1 to n do
 write(b[i]:7:2);
readln
end.

@Mari04 · 24.03.2010, 14:27 **[ТС]**

Большое спасибо!)) А какой может быть второй способ?

@Mari04 0 / 0 / 0 Регистрация: 04.03.2010 Сообщений: 22
		1
	Получить одномерный массив,состоящий из средних арифметических значений элементов строк матрицы. 23.03.2010, 21:03. Показов 1950. Ответов 2 Метки нет (Все метки) Народ,помогите пожалуйста составить программу и блок-схему к ней. Дана квадратная матрица.Получить одномерный массив,состоящий из средних арифметических значений элементов строк матрицы.Получить одномерный массив,отсортировать в порядке возрастания элементов.Вывести: -матрицу -одномерный массив до сортировки -после сортировки Решить двумя способами. 0

@Mari04 0 / 0 / 0 Регистрация: 04.03.2010 Сообщений: 22
	24.03.2010, 14:27 [ТС]	3
	Большое спасибо!)) А какой может быть второй способ? 0

Опции темы

Получить одномерный массив,состоящий из средних арифметических значений элементов строк матрицы.

Решение