Составить программу определяющую количество счастливых билетов - QBasic
Формулировка задачи:
На части катушки с автобусными билетами номера шестизначные. Составить программу определяющую количество счастливых билетов на катушке, если меньший номер билета N, больший M.
Решение задачи: «Составить программу определяющую количество счастливых билетов»
textual
Листинг программы
... For z123 = 0 To 13 nIter = nIter + 1 nSum = nSum + T(z123) ^ 2 Next nSum = nSum * 2 ... Function T(ByVal i) T = (i + 1) * (i + 2) / 2 If i > 9 Then i = i - 10 T = T - 3 * (i + 1) * (i + 2) / 2 End If End Function
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д