Дана последовательность N
Вывести все возможные перестановки.
Вторая (2)
Дана последовательность N
Вывести все суммы элементов.
Например
N=1,2,3,43,3
1+2=3
1+3=4
1+43=44
потом
2+3=5
……
2+3+43+3
И так далее
Объясните алгоритм пожалуйста.


Open "Output.txt" for Output as #1
    For i = 1 to N
        For j = i +1 to N
            Print #1, Str$(R(i) + R(j))
        Next j
    Next i
Close #1




Сейчас этот форум просматривают: Yandex-бот и гости: 8