Вирішити задачу і записати в Excel Розрахуйте потрібну суму на закупку розсади полуниці сорту
«королева Вікторія» за таких умов:
• потрібно купити 1000 кущів;
• саджанці продають пакетами, кожний пакет містить 10 саджан-
ців і коштує 169 грн;
• за першу сотню саджанців покупець платить повну вартість,
за кожну наступну сотню вартість зменшується на 1 % від попе-
редньої.
211
393
Ответы на вопрос:
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
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kat1981020.05.2022 10:03
-
026k01.09.2022 14:57
-
зарина6748918.06.2021 01:24
-
Alusa66629.12.2020 19:41
-
МашунькA09.06.2023 14:12
-
CorrupteD17.05.2023 02:55
-
chuckcher13.08.2022 20:43
-
TanyaSha30019.10.2022 15:39
-
sanyasoloveva122.04.2022 12:09
-
mspanda2210.09.2021 15:37
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.