Массив целых чисел А обозначает цены посещения станций на линейной дороге:
{10, 5, 20, 10, 30, 40, 30, 30, 30, 50, 100, 2, 10, 3, 20}
Дима стартует с первой станции и хочет добраться до последней самым недорогим .
Когда Дима находится на станции i он имеет две возможности: переместится на станцию i+1
или пропустить ее и сразу попасть на станцию i+2. Диме придется заплатить за посещение
выбранных им на пути станций.
Какова минимально возможная стоимость путешествия Димы, включая стоимость начальной
и конечной станций? (ответ объясните)
//PascalABC.NET v3.3 1633
var arr: array [1..6, 1..6] of integer;
begin
for var i:=1 to 6 do
for var j:=1 to 6 do
arr[i, j]:=random(-49, 50);
writeln('Исходный массив: ');
for var i:=1 to 6 do
arr[i].PrintLn(', ');
var num:=0;
for var i:=1 to 6 do
if arr[i, 2] < 0 then num += 1;
writeln('Количество отрицательных элементов второго столбца: '+num);
for var i:=1 to 6 do
for var j:=1 to 6 do
if arr[i, j] > 0 then arr[i, j]:=-49;
writeln('Новый массив: ');
for var i:=1 to 6 do
arr[i].PrintLn(', ');
end.