Дан целочисленный массив А (а1 ... аn). Нужно получить массив В изменяя массив А так, чтобы все отрицательные числа в массиве В были равны 0, а все положительные 1.

Question

Информатика

Всеслав

12 марта, 17:29

Дан целочисленный массив А (а1 ... аn). Нужно получить массив В изменяя массив А так, чтобы все отрицательные числа в массиве В были равны 0, а все положительные 1.

+3

Ответы (1)

Знаете ответ на вопрос?

Егорич · Answer 1

I: integer;

a: array [0 ... 100] of integer;

b: array [0 ... 100] of integer;

for i:=0 to 100 do begin

if A[i]<0 them b[i]:=0

else b[i]:=1;

end;