Составить программу на Паскаль
Из массива Р, содержащего 10 элементов, сформировать массив Н по правилу:
Н(к)=I/P(к), (к -чётные), Н(к)=Р(к)+к, (к - нечётные)
В массиве, содержащем 10 элементов, нечётным элементам присвоить значения квадратов их индексов.
В массиве, содержащем 10 элементов, напечатать индекс последнего из элементов, равных 0.