- 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)
От - О с чертой
Константа, короче говоря.
Настоящий стек.
Кстати, смайл . :) если повернуть в районе головы налево, то это не просто смайл, а волшебная шапочка.
Кстати, идея с поворотом головы используется в моем методе решении задачи про два стека. Я так долго не писал про решение потому, что надо было согласовать решение с научным руководителем.
Мама за компьютер не пускала?
ну как, согласовал?
Алехуй, а может ты тот самый Компренда, а?
ЧМАКИ ВСЕХ В ЭТОМ ЧЯТИКЕ!!!!!!))))))
ну как, послал?