Вписати фрагмент програми, який відповідає опису. одновимірний масив n із 10 дійсних чисел var n: array[1..10]of real; одновимірний масив ran із 30 цілих чисел. сума всіх елементів масиву, який складається з 30 елементів елементи довільного масиву дорівнюють квадратам своїх індексів ввести з клавіатури в масив 20 цілих чисел