Найти и вывести номера и среднее арифметическое столбцов, которые начинаются с 2

@dereas · Регистрация: 02.05.2013

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

Помогите пожалуйста решить)
1. Задана матрица Е (N<=20, M<=15). Найти и вывести номера и среднее арифметическое столбцов, которые
начинаются с 2. Если таких столбцов не окажется, то выдать соответствующее сообщение.
2. В матрице Е найти и вывести элементы нечетных строк.
3. Вывести исходную матрицу.
Размерность и элементы исходной матрицы пользователь задает с клавиатуры.

@Taftis · 20.05.2013, 16:58

Добавлено через 7 минут
.1.

Pascal

if i=1 then 
for j:=1 to m do
 if a[i,j]=2 then begin
b[e]:=j;//
e:e+1; end // zdes zapis v noviy massiv indexov stolbcov y kotorih 1 element =2
else
writeln('no result');f:=13;//esli nety to vivod soobscheniya
if f<>13 then begin
for i:=1 to n do
for j:=1 to m do
 if j=b[e] then begin
 s:=s+a[i,j];k:=k+1;inc(e);
end;
for e:=1 to k do
writeln('nomer stolbca nachinayuschegosia s 2',b[e]);
writeln('sred arifmet=',s/k);
end;
 
2

Добавлено через 3 минуты

Pascal

for i:=1 to n do
for j:=1 to m do
if i mod 2<>0 then 
writeln('a[',i,',',j']=',a[i,j]:3:2);

@dereas 0 / 0 / 0 Регистрация: 02.05.2013 Сообщений: 4
		1
	Найти и вывести номера и среднее арифметическое столбцов, которые начинаются с 2 20.05.2013, 15:47. Показов 1205. Ответов 1 Метки нет (Все метки) Помогите пожалуйста решить) 1. Задана матрица Е (N<=20, M<=15). Найти и вывести номера и среднее арифметическое столбцов, которые начинаются с 2. Если таких столбцов не окажется, то выдать соответствующее сообщение. 2. В матрице Е найти и вывести элементы нечетных строк. 3. Вывести исходную матрицу. Размерность и элементы исходной матрицы пользователь задает с клавиатуры. 0

	20.05.2013, 16:58

Опции темы

Найти и вывести номера и среднее арифметическое столбцов, которые начинаются с 2

Решение