Преобразовать одномерный массив из 10 элементов, заменив все отрицательные числа на -1 , а положительные на +1
язык программирования? или вам блок-схему?
begin
var a := ArrRandom(10, -50, 50);
a.Println;
a.Transform(t -> Sign(t));
a.Println
end.