6. Заполните одномерный массив из n элементов следующим образом: Номера элементов массива 1 2 3 4 5 6 7 ... Значения элементов массива 0 3 0 5 0 7 0

Question

Бонда

Информатика

21 августа, 18:23

6. Заполните одномерный массив из n элементов следующим образом: Номера элементов массива 1 2 3 4 5 6 7 ... Значения элементов массива 0 3 0 5 0 7 0

+3

Ответы (1)

Знаешь ответ на этот вопрос?

Пётр Попов · Answer 1

Pascal:

Const k = 1000;

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

i, n:integer;

begin

writeln ('введите n ');

readln (n);

for i:=1 to n do begin

if i mod 2 = 0 then a[i]:=i+1;

write (a[i],' ');

end;

end.

Тестовое решение:

введите n

10

0 3 0 5 0 7 0 9 0 11