В одномерном массиве найти количество элементов, сумма которых меньше заданного числа - QBasic

Узнай цену своей работы

Формулировка задачи:

Здравствуйте. Подскажите пожалуйста алгоритм, для решения этой задачи. Нужно создать одномерный массив, заполнить элементами. Найти количество элементов, сумма которых меньше заданного числа. То есть, попарно складывать элементы массива, начиная 1-2,2-3,3-4 и тд. сравнивая их значение с введенным числом. В конце вывести количество элементов, сумма которых меньше заданного.

Решение задачи: «В одномерном массиве найти количество элементов, сумма которых меньше заданного числа»

textual
Листинг программы
  1. INPUT "Количество элементов в массиве?", n
  2. DIM a(n)
  3. INPUT "Введите заданное число",b
  4. PRINT "Заполните массив"
  5. FOR i=1 TO n
  6. INPUT a(i)
  7. NEXT i
  8. c=0:s=0
  9. FOR i=1 TO n
  10. FOR j=i+1 TO n
  11. s=a(i)+a(j)
  12. IF s<b THEN c=c+1
  13. s=0
  14. NEXT j
  15. NEXT i
  16. PRINT "Количество элементов, сумма которых меньше",b,"=",c
  17. END

Объяснение кода листинга программы

  1. В первой строке запрашивается количество элементов в массиве и сохраняется в переменной n.
  2. Далее, создается массив a(n) и запрашивается ввод заданного числа, которое сохраняется в переменной b.
  3. Выводится сообщение Заполните массив
  4. В цикле от 1 до n происходит заполнение массива a(i) путем ввода значения с клавиатуры.
  5. Затем, инициализируются переменные c=0 и s=0. Переменная c будет использоваться для подсчета количества элементов, а переменная s для временного хранения суммы элементов.
  6. В цикле от 1 до n происходит сравнение суммы элементов a(i) и a(j) с заданным числом b. Если сумма меньше b, то значение переменной c увеличивается на 1.
  7. После окончания второго цикла, выводится сообщение Количество элементов, сумма которых меньше,b,=,c.
  8. Код завершается.

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

14   голосов , оценка 3.929 из 5

Нужна аналогичная работа?

Оформи быстрый заказ и узнай стоимость

Бесплатно
Оформите заказ и авторы начнут откликаться уже через 10 минут
Похожие ответы