Составить программу определяющую количество счастливых билетов - 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
ИИ поможет Вам:
- решить любую задачу по программированию
- объяснить код
- расставить комментарии в коде
- и т.д
