profile
Размещено 5 лет назад по предмету Информатика от Travka24

(Pascal)
Из двух стеков, создать новый стек:элементы брать по-очерёдно из исходных стеков из первого-чётные, из второго нечётные: [1,18,20,13,2],[4,8,10,11,9], получили [2,9,20,11,18]
(ВЫПОЛНИТЬ С ЭЛЕМЕНТАМИ ПРОЦЕДУР)

  1. Ответ на вопрос
    Ответ на вопрос дан Аккаунт удален
    PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
    Внимание! Если программа не работает, обновите версию!

    begin
      var st1:=new Stack<integer>;
      foreach var t in Seq(2,13,20,18,1) do st1.Push(t);
      Write('Стек1: '); st1.Println;
      var st2:=new Stack<integer>;
      foreach var t in Seq(9,11,10,8,4) do st2.Push(t);
      Write('Стек2: '); st2.Println;
      var st3:=new Stack<integer>;
      while st1.Count+st2.Count>0 do begin
        while st1.Count>0 do begin
          var k:=st1.Pop;
          if k.IsEven then begin
            st3.Push(k);
            break
            end
          end;
        while st2.Count>0 do begin
          var k:=st2.Pop;
          if k.IsOdd then begin
            st3.Push(k);
            break
            end
          end
        end;
      Write('Стек3: '); st3.Println;  
    end.
Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 5 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 6 класса 1. укажите личное местоимение: 1) некто 2) вас 3) ни с кем 4) собой 2. укажите относительное местоимение: 1) кто-либо 2) некоторый 3) кто 4) нам 3. укажите вопросительное местоимение: 1) кем-нибудь 2) кем 3) себе 4) никакой 4. укажите определительное местоимение: 1) наш 2) который 3) некий 4) каждый 5. укажите возвратное местоимение: 1) свой 2) чей 3) сам 4) себя 6. найдите указательное местоимение: 1) твой 2) какой 3) тот 4) их 7. найдите притяжательное местоимение: 1) самый 2) моего 3) иной 4) ничей 8. укажите неопределённое местоимение: 1) весь 2) какой-нибудь 3) любой 4) этот 9. укажите вопросительное местоимение: 1) сколько 2) кое-что 3) она 4) нами 10. в каком варианте ответа выделенное слово является притяжательным местоимением? 1) увидел их 2) её нет дома 3) её тетрадь 4) их не спросили

Информация

Посетители, находящиеся в группе Гости, не могут оставлять комментарии к данной публикации.