Question

1) Дан одномерный массив размерностью n. Заменить положительные элементы массива единицами, а отрицательные нулями.

2) Дан одномерный массив размерностью n. Найти произведение элементов массива. 

Answer 1

Задача 1,2 решена, код представлен во вложеном файле.

246e6964ebaf7a9835e19047c13d466a.pas

5f6cfe9604fab13c303150c55d2097a5.pas