Регистрация Спросить otvet5GPT
annasevsehkocot
28.03.2021 19:06
Информатика
Есть ответ 👍

Ввети з клавіатури n будь-яких чисел.з-ти кількість додатніх та від*ємних чисел лазарус

158
446
Посмотреть ответы 2

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

лимон2509
лимон2509
4,5(88 оценок)
Код: procedure tform1.button1click(sender: tobject); var kolo,kolp,i,n: integer; a: array[1..1000] of integer; begin n: =memo1.lines.count; kolo: =0; kolp: =0; for i: =1 to n do   begin   a[i]: =strtoint(memo1.lines[i-1]);   if a[i]> 0 then kolp: =kolp+1;   if a[i]< 0 then kolo: =kolo+1;   end;   showmessage('количество положительных: '+inttostr(kolp));   showmessage('количество отрицательных: '+inttostr(kolo)); end;     оформление:
БАХАУДДИН
БАХАУДДИН
4,7(80 оценок)

1.4

2.2

3.1

4.3

Объяснение:

надеюсь правильно

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

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

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

Caktus Image

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

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

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

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

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

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

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

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

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

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

GTP TOP NEWS