Предмет: Информатика, автор: Lizasuper2003

Положительные элементы заменить на 1, а отрицательные на - 1

Ответы

Автор ответа: xerex21
0
var a: array [1..30] of integer;
begin
for var i:=1 to 30 do
begin 
a[i]:=random(-30,30);
end;
println(a);
for var i:=1 to 30 do
begin
if (a[i]>0) then
a[i]:=1
else
a[i]:=-1;
end;
print(a);
end.
Похожие вопросы
Предмет: Алгебра, автор: olak2958
Предмет: Математика, автор: саня821
Предмет: Алгебра, автор: Аноним