Дан массив. выведите его элементы, которые встречаются в массиве только один раз

Дан массив. выведите его элементы, которые встречаются в массиве только один раз
Гость
Ответ(ы) на вопрос:
Гость
var a: array [1..10] of integer; i,b : integer; begin randomize; writeln('b='); readln(b); for i:=1 to 10 do a[i]:=Random(10); for i:=1 to 10 do if A[i]= b then writeln('есть',A[i]) else writeln('нет такого ') end.
Не нашли ответ?
Ответить на вопрос
Похожие вопросы