Паскаль. Матрица

@kirillcherkesov · Регистрация: 17.01.2010

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

Задана матрица E(N,M) N<=15,M<=20. помогите пожалуйста написать кусок программы, где необходимо Отпечтать номера и средние арифметические тех строк, которые начинаются с 1.

@Puporev · 29.05.2010, 14:11

Pascal

k:=0;
for i:=1 to n do
if e[i,1]=1 then
 begin
  k:=1;
  sr:=0;
  for j:=1 to m do
  sr:=sr+e[i,j];
  writeln('Строка ',i,'  среднее=',sr/m:0:2);
 end;
if k=0 then writeln('Таких строк нет!');

@kirillcherkesov 0 / 0 / 0 Регистрация: 17.01.2010 Сообщений: 16
		1
	Паскаль. Матрица 29.05.2010, 13:56. Показов 1005. Ответов 1 Метки нет (Все метки) Задана матрица E(N,M) N<=15,M<=20. помогите пожалуйста написать кусок программы, где необходимо Отпечтать номера и средние арифметические тех строк, которые начинаются с 1. 0

	29.05.2010, 14:11

Паскаль. Матрица

Решение