Если i – указатель вершины стека, то реализация описанных выше операций в псевдокоде будет выглядеть следующим образом:

Push(S,x)

i = i+1

S(i) = x

return

 

Pop(S)

x = S(i)

i = i -1

return

 

Empty(S)

if i = 0

  then “пусто

  Stop

  return

endif 

условие i=0 означает, что стек пуст

 

Full(S)

if i = maxS

  then “переполнение

            Stop

            return

endif

 

StackTop(S)

x = S(i)

return 

 

Если при выборке проверять стек на пустоту, а при занесении элемента проверять стек на переполнение, то алгоритмы операций считывания и занесения элемента  будут следующими:

Pop(S)

if i = 0 then “пусто

                Stop

                return

endif

x = S(i)

i = i -1

return

 

Push(S,i)

if i = maxS

  then “переполнение

                              Stop

                              return

endif

i = i+1

S(i) = x

return