Итак, стоимость
Итак, стоимость минимального маршрута равна 40. Дальнейшее решение зависит во многом от удачности выбора структур данных. Если определить:
Const NMax=11;
Type Cross=Record Rigth,Down,Turn:Integer; End;
Var A: Array[1..NMax,1..NMax] Of Cross; ,
то программная реализация логики будет достаточно компактна.
о94_5 Очередной пример рекурсивной логики. Пусть P - функция, которая каждому натуральному числу N ставит в соответствие множество его разбиений. При N=1 - одно разбиение. Будем хранить разбиение числа N в массиве A(A:Array[1..N] Of Integer). В переменной k будем фиксировать число элементов разбиения. Например, если разбиение состоит из самого числа N, то A[1]=N, а все остальные элементы равны 0, при N=1+1+...+1 - все элементы A равны 1. Итак, если на место k массива A мы записываем число i, то с k+1 места нам необходимо последовательно записывать все разбиения числа Sum-i, где Sum - сумма элементов разложения, записанных в А до k-го места.
о94_6 Задача логически разбивается на
Индекс
Элементарные функции
Линейные уравнения
Нелинейные уравнения
Случайные числа
