В матрице С [4 x 4] найти среднее арифметическое по каждому столбцу, определить номер столбца, в котором находится минимальное из них

@Egocbkee · Регистрация: 03.09.2011

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

В матрице С [4 x 4] найти среднее арифметическое по каждому столбцу, определить номер столбца, в котором находится минимальное из них, и вычесть его элементы из элементов строки с таким же, как столбец, номером.

Помогите пожалуйста,в паскале я не разбираюсь.а задачи сдать нужно(

@ivashka110 · 11.11.2013, 23:21

Pascal

uses crt;
const n=4;
type 
    mas=array[1..n,1..n] of integer;
var a:mas;
    i,j:byte;
    s:real;
    
begin
ClrScr; 
for i:=1 to n do 
    for j:=1 to n do a[i,j]:=random(10);
for i:=1 to n do begin
    for j:=1 to n do write(a[i,j]:5);
writeln;
end;
writeln('Среднее арифметическое каждого столбца:');
for j:=1 to n do begin
    s:=0;
    for i:=1 to n do s:=s+a[i,j];
    write(s/n:8:2);
    end;
    repeat until KeyPressed;
    end.

@Egocbkee · 11.11.2013, 23:53 **[ТС]**

Спасибо огромнейшее!

@Egocbkee · 20.11.2013, 16:20 **[ТС]**

А как будет выглядеть блок-схема,подскажите пожалуйста

@Egocbkee · 21.11.2013, 23:51 **[ТС]**

Помогите пожалуйста!

@Egocbkee 0 / 0 / 0 Регистрация: 03.09.2011 Сообщений: 37
		1
	В матрице С [4 x 4] найти среднее арифметическое по каждому столбцу, определить номер столбца, в котором находится минимальное из них 11.11.2013, 21:41. Показов 1822. Ответов 4 Метки нет (Все метки) В матрице С [4 x 4] найти среднее арифметическое по каждому столбцу, определить номер столбца, в котором находится минимальное из них, и вычесть его элементы из элементов строки с таким же, как столбец, номером. Помогите пожалуйста,в паскале я не разбираюсь.а задачи сдать нужно( Миниатюры 0

@Egocbkee 0 / 0 / 0 Регистрация: 03.09.2011 Сообщений: 37
	11.11.2013, 23:53 [ТС]	3
	Спасибо огромнейшее! 0

@Egocbkee 0 / 0 / 0 Регистрация: 03.09.2011 Сообщений: 37
	20.11.2013, 16:20 [ТС]	4
	А как будет выглядеть блок-схема,подскажите пожалуйста 0

@Egocbkee 0 / 0 / 0 Регистрация: 03.09.2011 Сообщений: 37
	21.11.2013, 23:51 [ТС]	5
	Помогите пожалуйста! 0