Цитата:
Сообщение от Linka
Целочисленный массив, вывести все числа которые встречаются по одному разу.
Я не прошу готового решения. Сам решить хочу, не получается. Как это реализовать ?
Получаестя, каждый элемент массива надо сравнить с другими элементами этого массива ? Если он уникален то его вывести.
Придумал вот, вставить такой "счетчик", который увеличивается каждый раз если, какой-то отдельный элемент не равен другому. И если значение счетчика, будет равно "количеству элементов в массиве минус один" то, тот конкретный элемент уникален, и его вывести.
Прекрасно понимаю, что решение далеко не оптимальное. Но и оно не хочет работать.
Код:
const n=10;
var a:array[1..n] of integer;
p,k,i,j:integer;
begin
p:=n;
for i:=1 to p do begin
for j:=2 to p do
begin
if a[i]<>a[j] then k:=k+1;
if k=n-1 then writeln(a[j-1]);
end;
k:=0;
end;
Что тут неправильно ?
|
Знаете... по-моему, там всё неправильно. Чего-то накрутили лишнего... Правильно Ваш алгоритм реализуется так:
Код:
const n=10;
var
a:array[1..n] of integer;
k,i,j:integer;
begin
for i:=1 to n do
begin
Write('a[',i:2,']= ');
Readln(a[i]);
end;
for i:=1 to n do
begin
k:=0;
for j:=1 to n do
if a[i]<>a[j] then k:=k+1;
if k=n-1 then writeln(a[i]);
end;
readln;
end.
Ну а конкретно разберитесь сами. Путем сопоставления двух кодов.