Решите мне пожалуйста две задачки на на Турбо Паскале!
1.Задайте последовательность с N целых чисел. Все положительные числа заносятся последовательно в стек, а каждое отрицательное отнимает из стека один елемент. Показывать все изменения что будут происходить на экране.
2. Смоделируйте структуру даных ДЕК. С клавиатуры вводятся целые числа, положительные прибавить к началу дека, а отрицательные с конца. В конце изъять даные с дека, начиная с положительных.