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
Не нашли ответ?
Похожие вопросы