Question

1) Массив Х(20) заполнить целыми случайными числами в диапазоне от - 11 до 20. Найти сумму S положительных элементов, заключенных между первым отрицательным и последним отрицательным элементами массива X. Вывести X, S.

2) Матрицу N(9,12) заполнить целыми случайными числами в диапазоне от -90 до 120. Переписать элементы массива N кратные заданному числу S подряд в массив М(?) Если таких элементов нет, выдать сообщение. Вывести N, S,M.

Answer 1

на фотке первая и вторая задачи соответственно

Answer 2

во второй немного колхозно сделал ибо не знал как вставлять элементы в динамич массив в паскале,поэтому на один проход по циклу больше чем могло быть