Есть ответ 👍

Вирішити задачу і записати в Excel Розрахуйте потрібну суму на закупку розсади полуниці сорту
«королева Вікторія» за таких умов:
• потрібно купити 1000 кущів;

• саджанці продають пакетами, кожний пакет містить 10 саджан-
ців і коштує 169 грн;

• за першу сотню саджанців покупець платить повну вартість,

за кожну наступну сотню вартість зменшується на 1 % від попе-
редньої.

211
393
Посмотреть ответы 1

Ответы на вопрос:

Kari200511
4,4(100 оценок)

Pascalabc.net 3.3.5, сборка 1650 от 01.04.2018 внимание! если программа не работает, обновите версию! type   tq=queue< integer> ; procedure заполнениеочереди(q: tq; n: integer); begin   randomize;   loop n do begin       var k: =random(-20,40);       q.enqueue(k)       end; end; procedure сумманужныхэлементов(q: tq; var s: integer); begin   var ko,k: integer;   for var i: =1 to q.count do begin       k: =q.dequeue; q.enqueue(k);       if k.isodd then ko: =k;       if i=3 then s: =k       end;   s+=ko   end; procedure удалитьэлемент(q: tq; p: integer); begin   for var i: =1 to q.count do begin       var k: =q.dequeue;       if i< > p then q.enqueue(k)       end end; begin   var myq: =new tq;   var n: =readinteger('кол-во элементов (не менее 4): ');   заполнениеочереди(myq,n);   myq.println;   var s: integer;   сумманужныхэлементов(myq,s);   myq.enqueue(s); // искомая сумма помещена в очередь   myq.println;   удалитьэлемент(myq,4);   myq.println end. пример кол-во элементов (не менее 4): 13 -7 12 -18 4 23 -1 15 -11 9 12 5 3 2 -7 12 -18 4 23 -1 15 -11 9 12 5 3 2 -15 -7 12 -18 23 -1 15 -11 9 12 5 3 2 -15

Реши свою проблему, спроси otvet5GPT

  • Быстро
    Мгновенный ответ на твой вопрос
  • Точно
    Бот обладает знаниями во всех сферах
  • Бесплатно
    Задай вопрос и получи ответ бесплатно

Популярно: Информатика

Caktus Image

Есть вопросы?

  • Как otvet5GPT работает?

    otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.
  • Могу ли я использовать otvet5GPT в школе?

    Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
  • В чем отличия от ChatGPT?

    otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.

Подпишись на наш телеграмм канал

GTP TOP NEWS