zadach235.BAS

{* Задача235 *}

REM basic

' У военного корабля есть n цветных флажков. Сколько различных сигналов
' он может подать, размещая на мачте по m флажков разного цвета.
' Использовать формулу K= n!/(m!(n-m)!) где ! - означает вычисление факториала
' Порядок следования цветов не учитывается.


CLS

INPUT "Ведите общее количество флажков n    ", n
INPUT "Ведите количество флажков на мачте m ", m

p1 = 1
        For i = 1 To n
                p1 = p1 * i
        Next i

p2 = 1
        For i = 1 To m
                p2 = p2 * i
        Next i

p3 = 1
        For i = 1 To n - m
                p3 = p3 * i
        Next i

K = p1 / (p2 * p3)   
        PRINT "Всего сигналов "; K

End