Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > IT форум > Помощь студентам
Регистрация

Восстановить пароль

Купить рекламу на форуме - 42 тыс руб за месяц

Ответ
 
Опции темы Поиск в этой теме
Старый 26.06.2014, 16:12   #1
Prey47
Пользователь
 
Регистрация: 25.06.2014
Сообщений: 11
По умолчанию Задание по Qbasic.Одномерный массив.

В массиве A() найти количество элементов, сумма которых меньше заданного.
Задание хоть и простое, но не могу понять условие задачи. То есть, мне нужно начиная с первого элемента массива, складывать их значения до тех пор, пока их сумма не станет больше заданного значения? Я тут написал программку, если не правильно, то поправьте пожалуйста.

Rem massiv
randomize timer
cls
b=INT(rnd*300)
dim a(20)
for i=1 to 20
a(i)=int(rnd*100)
next i
s=0:c=0
for i=1 to 20
print i,")",a(i)
s=s+a(i)
if s<b then c=c+1
next i
print "---------------"
Print "Количество элементов сумма которых меньше",b
print с
end
Prey47 вне форума Ответить с цитированием
Ответ


Купить рекламу на форуме - 42 тыс руб за месяц



Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Двумерный массив развернуть в одномерный массив по строкам[QBASIC] TrueStyle777 Помощь студентам 3 29.05.2013 21:56
одномерный массив в qbasic Граница Помощь студентам 0 17.12.2012 20:02
qBasic! Одномерный массив Xanoder Помощь студентам 1 27.12.2010 16:32
одномерный массив (qbasic) NiGiNa Помощь студентам 9 06.06.2009 19:55
одномерный массив в QBasic control1 Помощь студентам 5 04.04.2009 00:31