Регистрация Спросить otvet5GPT
shishkova600
06.03.2021 21:22
Информатика
Есть ответ 👍

Перед вами стоит оценить рентабельность n предприятий: стоит ли вообще их оставлять? рассчитайте k1, k2, k3 - количество прибыльных, убыточных и тех, что не приносят прибыли или убытка казне, магазинов. рассчитайте x - конечную прибыль города от этих предприятий. формат входных данных в первой строке вводится целое число предприятий n (1< = n < = 500) во второй строке вводится n целых чисел p, где p - доход каждого предприятия (0 < = |p| < = 10000), причём доход может быть отрицательным, если он не покрывает всех расходов на содержание магазина. формат выходных данных в первой строке выводятся значения k1, k2, k3. во второй строке выводится конечная прибыль x.

216
494
Посмотреть ответы 2

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

НастяЛайк111
НастяЛайк111
4,7(98 оценок)
Уменя так получилось: program rent; type arr = array of integer; var i, n, p, x, k1, k2, k3 : integer; a : arr; correct : boolean; begin write('введите количество предприятий: '); readln(n); if n> 500 then n: =500; setlength(a, n); writeln('введите доходность каждого предприятия'); for i: =0 to n-1 do begin correct : = true; repeat readln(p); if abs(p)> 10000 then begin writeln('доход введён неправильно. повторите ещё раз'); correct : = false; end else correct : = true; until correct; a[i] : = p; end; k1: =0; k2: =0; k3: =0; x: =0; for i: =0 to n-1 do begin if a[i]> 0 then k1 : = k1+1; if a[i]< 0 then k2 : = k2+1; if a[i]=0 then k3 : = k3+1; x : = x+a[i]; end; writeln('доходных: ', k1, ', убыточных: ', k2, ', с нулевым доходом: ', k3); writeln('общий доход города: ', x); end.
progamesnester
progamesnester
4,6(78 оценок)

ответ:

дай картинку надо

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

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

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

Caktus Image

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

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

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

  • Сколько это стоит?

    Проект находиться на стадии тестирования и все услуги бесплатны.

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

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

GTP TOP NEWS