Прошу помочь с решением задач по информатике по теме "Одномерные массивы" (язык программирования Pascal). Написать программы: 1) Даны два числа А и В. Если числа положительные, вычислить произведение этих чисел, если хотя бы одно их них отрицательное, вычислить сумму квадратов этих чисел. 2) Дан произвольный массив, замените каждый второй элемент массива на ноль, а каждый пятый увеличите в 2 раза. И выведите полученный массив на экран. Спасибо!