Question

№1.)
Дан массив целых чисел, состоящий  из 10 элементов. Заполнить его с клавиатуры.
Найти:
-Удвоенную сумму положительных элементов;
вывести значения тех элементов, которые меньше заданного числа A кратны 3.
№2.)
Из элементов массива P сформировать массив M той же размерности по правилу: если номер четный, то M[i]=P[i]*P[i], если нечетный, то M[i]=P[i]-1.
№3.)
В массиве поменять местами 3 и последний элемент.

Answer 1

Готово..........................

be2499b163cd556ffaf60da0c7cf9d79.pas