Mail.Ru Почта Мой МирОдноклассникиИгрыЗнакомстваНовостиПоискВсе проекты

Кто сможет решить задачку по QBasik?

Знаток (361), закрыт 7 лет назад
Лучший ответ
и где задачка?

Задачка:
Имеется товар в ящиках по 16,17,21 кг. составьте алгоритм, с помощью к-го определите, как загрузить в машину 185 кг товара, не вскрывая ящики.

Програмка:
m = 185
count = 0
FOR q21 = m \ 21 TO 0 STEP -1
FOR q17 = (m - q21 * 21) \ 17 TO 0 STEP -1
q16 = (m - q21 * 21 - q17 * 17) \ 16
IF m = q16 * 16 + q17 * 17 + q21 * 21 THEN
count = count + 1
PRINT USING "## - ## x 16 ## x 17 ## x 21"; count; q16; q17; q21
END IF
NEXT
NEXT
PRINT USING "Total ## result(s)"; count

Ответ:
1 - 0 x 16 1 x 17 8 x 21
2 - 5 x 16 0 x 17 5 x 21
3 - 1 x 16 5 x 17 4 x 21
4 - 6 x 16 4 x 17 1 x 21
5 - 2 x 16 9 x 17 0 x 21
Total 5 result(s)
Остальные ответы
basiC! Что за задача?
Довай пиши задание.. . и бабки готовь...
Подумаешь, бином Ньютона!
Я смогу.
Я тоже много программировал раньше. Ждем условие.
Похожие вопросы
Также спрашивают