Написать программу, которая вычисляет, сколько раз введенное с клавиатуры число встречается в массиве. Массив заполняется через random

Question

Информатика

Трифон

3 мая, 08:49

Написать программу, которая вычисляет, сколько раз введенное с клавиатуры число встречается в массиве. Массив заполняется через random

+3

Ответы (1)

Знаете ответ?

Афиноген · Answer 1

Var a:array[0 ... 10000] of integer; k, i, x, n:integer; beginread (n) ; / / n-количество элементов в массивеfor i:=1 to n do

a[i]:=random (500) + 5;

read (x) ; for i:=1 to n doif a[i]=x then k:=1+k; write (k) ; end.