нужно срочно дописать на PureBasic без классов программу - вопрос №241733

Нужно дописать программу. Желательно, на PureBasic. В крайнем случае — на VB\Pascal\C|C++. Писать надо БЕЗ КЛАССОВ, так как программа уже написана на PureBasic, а он классы не поддерживает, насколько я знаю. Вкратце, задача следующая. Дан граф, состоящий из N узлов и K дуг. Нужно вычислить матрицу смежности — число всех маршрутов одинаковой длины из каждого узла в каждый. Для 1-гоузла считаем число маршрутов в 1 дугу, затем — в 2 дуги… N дуг. Аналогичные операции проделываем для остальных узлов. Например, дан граф из 3-х узлов, гда каждый узел соединен с каждым. Матрица смежности будут выглядеть следующим образом: 1L 2L 3L 1 2 2 1 1 2 2 1 1 2 2 1