Мастера DELPHI (документация, исходники, скачать)

Основная («Начинающим»)/ Базы / WinAPI / Компоненты / Сети / Media / Игры / Corba и COM / KOL / FreePascal / .Net / Прочее / RSDN.ORG

« предыдущая ветвь | форум | следующая ветвь »

Составить алгоритм решения задачи (можно привести программу на Я [D7, XP]

Антон © (2008-06-18 18:38:00)
Вопрос : - Вывести числа, которые встречаются в массиве больше одного раза,составить Алгоритм.Помогите пожалуйста мастера Delphi - не как не могу сдать контрольную в универ.

Игорь Шевченко (2008-06-19 11:06:00) [1]

> если никто не подскажет,будет бумать своей головой

мудрое решение

Sha (2008-06-19 11:05:00) [2]
Сортировки проходили?

Поросенок Винни-Пух (2008-06-18 19:16:00) [3]
oraquery.sql.text := 'insert into table values(:p_val)';
for i := 1 to length(arr) do
begin
oraquery.parambyname('p_val').AsInteger := arr[i];
oraquery.execute;
end;

oraquery.sql.text := 'select int_value,count(*) from table group by int_value having count(*) >1';
oraquery.open;

Правильный-Вася (2008-06-18 19:09:00) [4]
взять 1 элемент массива
сравнить с оставшимися
если он встретился, запомнить
взять 2 элемент массива
если он не содержится в запомненных, обработать как 1-й
и т.п.
вывести запомненный список

Поросенок Винни-Пух (2008-06-18 19:08:00) [5]
один проход. идешь и считаешь.
потом проход по результату и сравнение с цифрой два.

Антон (2008-06-18 19:05:00) [6]
Ну почему же не стоит?если никто не подскажет,будет бумать своей головой...хоть старался и стараюсь...

Dummy (2008-06-18 18:43:00) [7]
Не стОит Вам ее сдавать, ой не стОит.

Наверх

	« предыдущая ветвь \| форум \| следующая ветвь »