Ко всем нулевым элементам массива прибавить n

@i.ramiz05 · Регистрация: 04.12.2010

Ко всем нулевым элементам прибавить n, из все положительных элементов вычесть a, ко всем отрицательным прибавить b?

@mamedovvms · 13.12.2010, 14:41

Pascal

if с[i] = 0 then с[i]:= n
else if с[i] > 0 then 
  с[i]:= с[i] - a
else
 с[i]:= с[i] +b;

@Puporev · 13.12.2010, 14:42

Pascal

for i:=1 to k do
if m[i]=0 then m[i]:=m[i]+n
else if m[i]>0 then m[i]:=m[i]-a
else m[i]:=m[i]+b;

Добавлено через 35 секунд

Сообщение от mamedovvms

a[i]:= a[i] - a

Я тоже так сначала написал..........

@mamedovvms · 13.12.2010, 14:43

))))
да что то не подумал))))

@i.ramiz05 2 / 2 / 0 Регистрация: 04.12.2010 Сообщений: 31
		1
	Ко всем нулевым элементам массива прибавить n 13.12.2010, 14:34. Показов 1827. Ответов 3 Метки нет (Все метки) Ко всем нулевым элементам прибавить n, из все положительных элементов вычесть a, ко всем отрицательным прибавить b? 0

@mamedovvms 2923 / 844 / 324 Регистрация: 30.04.2009 Сообщений: 2,633
	13.12.2010, 14:43	4
	)))) да что то не подумал)))) 0