Pascal abc
<em><u>Проверка</u></em>
-29 13 -23 -20 10 13 -23 -1 30 45
кол-во полож=5<span>
</span>
Пишу на QBasic
массив создан и заполнен
PRINT "Введите количество элементов массива"
INPUT N
MIN= 150
FOR I = 1 TO N
IF I <MIN AND I>0 THEN
MIN = I
END IF
NEXT I
PRINT MIN
Часть схемы, передающей информацию - канал.
Для решения по таблице строится схема дорог (прикреплена картинка).
По ней находим кратчайший путь.
A->C->D->B = 4