антон23 А антон23 Регистрация 23 Окт 2013 Сообщения 91 Репутация 1 Спасибо 0 Монет 0 13 Янв 2017 #1 После обработки одномерного массива -8 4 -7 1 0 -1 -3 0 … For i:=1 to n do If a>0 then write(i); … На экране появляется последовательность …
После обработки одномерного массива -8 4 -7 1 0 -1 -3 0 … For i:=1 to n do If a>0 then write(i); … На экране появляется последовательность …