Дан одновременный одночисленный масив вывести масив на экран строку элементы стоящие на четных местах заменить нулем вывести образованный массива на экран строку пример:

ввод: 5; 5,1,2,3,4

вывод: 5,0,2,0,4

Question

Информатика

Глеб

22 февраля, 13:45

Дан одновременный одночисленный масив вывести масив на экран строку элементы стоящие на четных местах заменить нулем вывести образованный массива на экран строку пример:

ввод: 5; 5,1,2,3,4

вывод: 5,0,2,0,4

+1

Ответы (1)

Знаете ответ?

Увар · Answer 1

Program chik;

var a:array[1 ... 1000]of integer;

var n, i:integer;

begin

read (n) ;

for i:=1 to n do

begin

read (a[i]) ;

end;

for i:=1 to n do

begin

if (i mod 2=0) then a[i]:=0;

end;

for i:=1 to n do

begin

write (a[i],' ') ;

end;

end.