powered by simpleCommunicator - 2.0.61     © 2026 Programmizd 02
Целевая тема:
Создать новую тему:
Автор:
Закрыть
Цитировать
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Вопрос по программированию
24 сообщений из 24, страница 1 из 1
Вопрос по программированию
    #36005903
Ювентус
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
Значит так
Есть файл который состоит из чисел.Количевство каждого числа есть велечина четная.Только количевство одного числа не четная Какраз надо найти это число

Пример

1,3,4,1,3,3,4,1,5,5,1 здесь результат как видим 3
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36005946
eee-pc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Значит так.
500р
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36006229
Фотография Ёш
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
$ echo  1 , 3 , 4 , 1 , 3 , 3 , 4 , 1 , 5 , 5 , 1  | tr ',' '\n' | sort | uniq -c | awk '$1 % 2 { print $2 }'
 3 


--
„Истина — это вовсе не то, что можно убедительно доказать, это то, что
делает всё проще и понятнее“ — Антуан де Сент-Экзюпери
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36006583
belugin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
 1 , 3 , 4 , 1 , 3 , 3 , 4 , 1 , 5 , 5 , 1  | group | ?{ !($_.Count %  2  -eq  0 )} | select name
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36006765
belugin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
[ 1 ; 3 ; 4 ; 1 ; 3 ; 3 ; 4 ; 1 ; 5 ; 5 ; 1 ] 
    |> Seq.countBy (fun x->x) 
    |> Seq.filter (fun (_, c) -> c %  2  <>  0 ) 
    |> Seq.map fst    
    |> printf "%A"
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36006793
Сансенд
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
xor поэлементно всех чисел в файле, в ответе искомое число
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36007232
Фотография ZyK_BotaN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
reduce( lambda x,y: x^y, (1,3,4,1,3,3,4,1,5,5,1))
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010133
RAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
belugin
Код: plaintext
1.
2.
3.
4.
5.
[ 1 ; 3 ; 4 ; 1 ; 3 ; 3 ; 4 ; 1 ; 5 ; 5 ; 1 ] 
    |> Seq.countBy (fun x->x) 
    |> Seq.filter (fun (_, c) -> c %  2  <>  0 ) 
    |> Seq.map fst    
    |> printf "%A"


oO что за язык страшный?
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010352
belugin4
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Гость
RAndrew
oO что за язык страшный?

F#
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010494
RAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
import Data.List
import System (getArgs)

dropPairs [] = []
dropPairs (x:xs) | x `elem` xs = dropPairs $ delete x xs
                 | otherwise   = x:dropPairs xs

main = do
  file <- fmap head getArgs
  l <- readFile file
  print . head $ dropPairs l
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010819
Фотография mccc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Сансенд xor поэлементно всех чисел в файле, в ответе искомое число
+!
Код: plaintext
select  1  ^  3  ^  4  ^  1  ^  3  ^  3  ^  4  ^  1  ^  5  ^  5  ^  1 
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010901
RAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
ну тогда
Код: plaintext
1.
dropPairs l = foldl1' xor l
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010940
belugin
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
dropPairs = foldl1' xor
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36010974
RAndrew
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
даже хуже :)
dropPairs = foldl' (flip $ xor . digitToInt) 0
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36011400
случайный гость
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
mccc,

select 1 ^ 3 ^ 4 ^ 1 ^ 3 ^ 3 ^ 4 ^ 1 ^ 5 ^ 5 ^ 1 ^ 4 ^ 4 ^ 4

= 7
:D))
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36011542
Фотография mayton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Код: plaintext
1.
2.
3.
4.
5.
6.
7.
8.
9.
10.
11.
12.
13.
14.
15.
16.
17.
18.
19.
20.
21.
22.
23.
24.
with t as (
select  1  n from dual
union all
select  3  from dual 
union all
select  4  from dual 
union all
select  1  from dual 
union all
select  3  from dual 
union all
select  3  from dual 
union all
select  4  from dual 
union all
select  1  from dual 
union all
select  5  from dual 
union all
select  5  from dual 
union all
select  1  from dual 
)
select n from t group by n having mod(count(n), 2 )= 1 ;
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36011654
Фотография mayton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
mcccСансенд xor поэлементно всех чисел в файле, в ответе искомое число
+!
Код: plaintext
select  1  ^  3  ^  4  ^  1  ^  3  ^  3  ^  4  ^  1  ^  5  ^  5  ^  1 

В общем случае, может оказаться два непарных числа. Тогда решение будет ошибочным.
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36011667
eee-pc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
maytonmcccСансенд xor поэлементно всех чисел в файле, в ответе искомое число
+!
Код: plaintext
select  1  ^  3  ^  4  ^  1  ^  3  ^  3  ^  4  ^  1  ^  5  ^  5  ^  1 

В общем случае, может оказаться два непарных числа. Тогда решение будет ошибочным.

по условию, оно единственно
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36011681
Фотография mayton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Дай бог. Но препод может сделать проверку на вшивость. XOR - это конечно хакерский hint, но никак не тянет на лабораторную.
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36012082
Фотография Изопропил
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
maytonДай бог. Но препод может сделать проверку на вшивость. XOR - это конечно хакерский hint, но никак не тянет на лабораторную.

тем не менее единственный, дающий O(N).
"Только количевство одного числа не четная" - довольно существенная часть формулировки задачи
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36012210
Фотография ZyK_BotaN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
препод скорее всего и ожидает решение с помощью хора.
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36012982
Фотография mayton
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Вряд-ли. Препод ожидает любое решение. Использование xor слишком специфично ИМХО.
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36013777
Фотография ZyK_BotaN
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
тогда, небыло бы оговогри "Только количевство одного числа не четная".думаю для этого условия хор - идеальное решение.
...
Рейтинг: 0 / 0
Вопрос по программированию
    #36014537
Фотография mccc
Скрыть профиль Поместить в игнор-лист Сообщения автора в теме
Участник
Случайный гостьmccc,

select 1 ^ 3 ^ 4 ^ 1 ^ 3 ^ 3 ^ 4 ^ 1 ^ 5 ^ 5 ^ 1 ^ 4 ^ 4 ^ 4 = 7

по условию
Ювентус
Количевство каждого числа есть велечина четная . Только количевство одного числа не четная
подсчитай количество "3" и "4"
...
Рейтинг: 0 / 0
24 сообщений из 24, страница 1 из 1
Форумы / Программирование [игнор отключен] [закрыт для гостей] / Вопрос по программированию
Найденые пользователи ...
Разблокировать пользователей ...
Читали форум (0):
Пользователи онлайн (0):
x
x
Закрыть


Просмотр
0 / 0
Close
Debug Console [Select Text]