|
|
Опции темы | Опции просмотра |
24.03.2014, 19:11 | #1 (permalink) |
Новичок
Регистрация: 24.03.2014
Сообщений: 4
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 10
|
Среди нечетных строк массива определить количество элементов, равных первому элементу
|
24.03.2014, 19:11 | |
Helpmaster
Member
Регистрация: 08.03.2016
Сообщений: 0
|
Бывает, что в аналогичных темах можно найти множество нужной информации Определить количество положительных элементов матрицы Дан массив A(n,m). Найти количество элементов в каждой строке, меньшего диагонального |
24.03.2014, 22:39 | #2 (permalink) |
Member
Регистрация: 31.03.2010
Адрес: Тульская область
Сообщений: 1,309
Сказал(а) спасибо: 11
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 13090
|
const n= 10;
m= 10; type Tmatr= array[1..n,1..m] of byte; var A: Tmatr; e,i,j: byte; begin Randomize; for i:=1 to n do for j:=1 to m do A[i,j]:= Random(10); e:=0; for i:=1 to n do for j:=1 to m do if (j mod 2)<>0 then if A[i,j] = A[1,1] then Inc(e); Writeln(e); Readln; end. |
Ads | |
Member
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070
|
|
|