Задать вопрос
ИнформатикаИнформатика
10 мая, 10:49

Помогите решить задачу.

Дан массив. Найти количество элементов массива равных первому элементу.

+1
Ответы (1)
  1. 10 мая, 11:16
    0
    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.
Знаете ответ на вопрос?
Не уверены в ответе?
Правильный ответ на вопрос 👍 «Помогите решить задачу. Дан массив. Найти количество элементов массива равных первому элементу. ...» по предмету 📗 Информатика. Развернутая система поиска нашего сайта обязательно приведёт вас к нужной информации. Как вариант - оцените ответы на похожие вопросы. Но если вдруг и это не помогло - задавайте свой вопрос знающим оппонентам, которые быстро дадут на него ответ!
Искать готовые ответы
Главная » Информатика » Помогите решить задачу. Дан массив. Найти количество элементов массива равных первому элементу.
Регистрация Забыл пароль