- 01
- 02
- 03
- 04
- 05
- 06
- 07
- 08
- 09
- 10
- 11
Dim a as Stack
Dim b as Stack
For n :=8 to 1:
a.Push 1
b.Push 1 xor n
if n xor 1 = 1 then
begin
a.push(b) b.push(a)
end
end
Нашли или выдавили из себя код, который нельзя назвать нормальным, на который без улыбки не взглянешь? Не торопитесь его удалять или рефакторить, — запостите его на говнокод.ру, посмеёмся вместе!
−149
Dim a as Stack
Dim b as Stack
For n :=8 to 1:
a.Push 1
b.Push 1 xor n
if n xor 1 = 1 then
begin
a.push(b) b.push(a)
end
end
Мультивложенные стеки
Операции за О(1)
Вставка, забывчивость
О(1)
Извлечение в От (1)
От - О с чертой
Константа, короче говоря.
Настоящий стек.
alexoy 19.10.2011 23:10 # −5
Кстати, смайл . :) если повернуть в районе головы налево, то это не просто смайл, а волшебная шапочка.
Кстати, идея с поворотом головы используется в моем методе решении задачи про два стека. Я так долго не писал про решение потому, что надо было согласовать решение с научным руководителем.
koodeer 19.10.2011 23:32 # +6
Мама за компьютер не пускала?
MAKAKA 29.05.2020 02:53 # 0
ну как, согласовал?
KirAmp 20.10.2011 00:30 # +3
bot-minurast 20.10.2011 00:40 # +2
Алехуй, а может ты тот самый Компренда, а?
AnimeGovno-_- 20.10.2011 01:01 # −6
bot-minurast 20.10.2011 02:03 # −4
bugmenot 20.10.2011 20:07 # 0
ЧМАКИ ВСЕХ В ЭТОМ ЧЯТИКЕ!!!!!!))))))
Lure Of Chaos 20.10.2011 09:13 # +3
Uhehesh 20.10.2011 18:45 # 0
MAKAKA 29.05.2020 02:54 # 0
ну как, послал?
guest8 09.04.2019 11:46 # −999