Разработать блок схему и написать программу в qbasic дан массив а из 20 элементов. найти сумму отрицательных элементов массива.результат вывести на печать

105

356

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

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

Мурочkина

Информатика

4,7(59 оценок)

Dim ch$(26) for i = 1 to 26 ch$(i) = chr$(asc("a") + i - 1) next dim cw(26) as long print "text: " input "", s$ do while s$ < > "*" s$ = s$ + " " iw = 0 for i = 1 to len(s$) c$ = mid$(s$, i, 1) if iw = 0 and c$ < > " " then iw = 1 idx = asc(c$) - asc("a") + 1 cw(idx) = cw(idx) + 1 elseif iw = 1 and c$ = " " then iw = 0 end if next input "", s$ loop for i = 1 to 25 m = i for j = i to 26 if cw(j) > cw(m) or (cw(j) = cw(m) and ch$(j) < ch$(m)) then m = j end if next if m < > i then tmp = cw(m) cw(m) = cw(i) cw(i) = tmp tmp$ = ch$(m) ch$(m) = ch$(i) ch$(i) = tmp$ end if next for i = 1 to 26 if cw(i) < > 0 then print ch$(i) + ": "; cw(i) end if next

ulialepsha

Информатика

4,6(67 оценок)

минут, секунд с начала суток.

Ввод - 24985 Вывод - 6 ч 56 мин 25 сек

Язык с++

Объяснение:

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

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

Задай свой вопрос

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

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

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

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

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

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

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