2. В массиве А: 7, 0, -2, 0, 3 все нулевые элементы заменить их индексами. Вывести на экра?

2. В массиве А: 7, 0, -2, 0, 3 все нулевые элементы заменить их индексами. Вывести на экра?? новый массив.
Гость
Ответ(ы) на вопрос:
Гость
Const n = 5; var a:array[1..5] of integer; i:integer; begin   a[1]:=7; a[2]:=0; a[3]:=-2;   a[4]:=0; a[5]:=3;   for i:=1 to n do if a[i]=0 then a[i]:=i;   for i:=1 to n do write(a[i]:3); end. Тестовое решение:  7  2 -2  4  3
Не нашли ответ?
Ответить на вопрос
Похожие вопросы