В одномерном массиве, состоящем из n целых чисел, заменить элементы с четными номерами нулем, а элементы с нечетными номерами - 1.

@gorodskoi · Регистрация: 18.09.2010

@Шутка · 12.10.2010, 22:53

Pascal

for i:=1 to n do begin
readln(a[i]);
if i mod 2 = 0 then a[i]:=0
 else a[i]:=-1;
end;

@gorodskoi 1 / 1 / 0 Регистрация: 18.09.2010 Сообщений: 34
		1
	В одномерном массиве, состоящем из n целых чисел, заменить элементы с четными номерами нулем, а элементы с нечетными номерами - 1. 12.10.2010, 22:14. Показов 1608. Ответов 1 Метки нет (Все метки) В одномерном массиве, состоящем из n целых чисел, заменить элементы с четными номерами нулем, а элементы с нечетными номерами - 1. 0

Опции темы

Решение