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

Написать процедуру, которая вставляет в список L действительных чисел новый
элемент E1 за каждым вхождением элемента E. Delhi 7 or Pascal ABC.NET

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

    procedure ListInsert(var L:List<real>;e,e1:real);
    begin
      for var i:=L.Count-1 downto 0 do
        if L[i]=e then L.Insert(i+1,e1)
    end;

    begin
      var P:=new List<real>;
      Writeln('Введите последовательность чисел, завершив её нулём');
      P.AddRange(ReadSeqRealWhile(a->a<>0));
      var what:=ReadReal('Что вставить?');
      var before:=ReadReal('После чего вставить?');
      ListInsert(P,before,what);
      Writeln('Результат:');
      P.Println
    end.

    Пример
    Введите последовательность чисел, завершив её нулём
    3.8 -6.2 1.45 2.18 -6.2 14 2.7 2.18 2.18 3.8 15.4 0
    Что вставить? 0.0001
    После чего вставить? 2.18
    Результат:
    3.8 -6.2 1.45 2.18 0.0001 -6.2 14 2.7 2.18 0.0001 2.18 0.0001 3.8 15.4

Не тот ответ на вопрос, который вам нужен?
Найди верный ответ
Самые новые вопросы
tegysigalpa2012
Русский язык - 6 лет назад

Помогите решить тест по русскому языку тест по русскому языку «местоимение. разряды местоимений» для 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) их не спросили

Информация

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