Задан одномерный массив из 10 элементов. Увеличить положительные числа в 3 раза, уменьшить отрицательные в 2 раза.В Turbo Pascal

Задан одномерный массив из 10 элементов. Увеличить положительные числа в 3 раза, уменьшить отрицательные в 2 раза.В Turbo Pascal
Гость
Ответ(ы) на вопрос:
Гость
for i:= 1 to n do if a[i] > 0 then a[i] * 3                                      else a[i] / 2
Не нашли ответ?
Ответить на вопрос
Похожие вопросы