В массиве M(n) найти первый и последний нулевые элементы
Категория: Basic
2011-09-26 16:39:57
code: #basic
INPUT n DIM a(n) FOR i = 1 TO n INPUT a(i) NEXT FOR i = 1 TO n IF a(i) = 0 THEN IF f = 0 THEN q = i: f = 1 ELSE qn = i END IF NEXT PRINT q, qn
Поделиться: