Врайоне 10 колхозов. в каждый из них должно быть поставлено а1, а2, а3 … а10 тракторов, а фактически поставлено b1, b2, b3… b10 тракторов. определить, сколько колхозов недополучили трактора. вывести на печать номера колхозов, получивших трактора сверх плана. решить.
118
149
Ответы на вопрос:
Const n=10; var a,b: array[1..n] of integer; i,k: integer; begin writeln('план поставки: '); for i: =1 to n do begin a[i]: =random(11)+5; write(a[i]: 3); end; writeln; writeln('поставлено: '); for i: =1 to n do begin b[i]: =random(11)+5; write(b[i]: 3); end; writeln; k: =0; writeln('получили трактора сверх плана колхозы: '); for i: =1 to n do begin if a[i]> b[i] then k: =k+1; if a[i]< b[i] then write(i,' '); end; writeln; writeln('количество колхозов, недополучивших трактора = ',k); end. пример: план поставки: 11 8 9 8 10 9 10 9 14 8 поставлено: 13 5 9 11 7 9 7 14 7 15 получили трактора сверх плана колхозы: 1 4 8 10 количество колхозов, недополучивших трактора = 4
If отсутствует. после строки readln(c); допиши: if (a< > 1) and (b< > 0) and (c< > 1) then begin f: =(b+sqrt(b*b+4*a*c))/(2**a*a)*c+1/sqr(b); writeln('f=',f); end else writeln('f=oo'); {это у меня знак бесконечности, можно, наверное, и словами написать} т.е. у вас отсутствует альтернатива. ps. знаменателем функции является только 2а? если так, то все.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
irinagerasimova123.08.2022 03:56
-
PomoGayka003.11.2020 23:07
-
natachapligina29.11.2021 09:10
-
kolianazarenko21.08.2020 08:23
-
samnsk10061730.12.2021 04:38
-
oksakuvp01cde27.06.2023 14:36
-
МилаКу14.12.2021 12:22
-
Нашли26.08.2022 08:55
-
Aleksey8b28.07.2020 18:45
-
linaserdyuk1326.12.2020 22:19
![Caktus Image](/tpl/img/cactus.png)
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.