Сумма компонентов - Pascal

  1. Помогите найти сумму компонентов a1+aN, a2+aN-1, a3+aN-2, ..., ak+am для k<=m.

textual

Код:

s:=0;
for i:=1 to n div 2 do//до середины массива
s:=s+a[i]+a[n-i+1];//суммируем пары симметричных
if odd(n) then s:=s+2*a[n div 2+1];//если размер нечетный, прибавляем удвоенное центральное (m=k).

Похожие ответы
  1. Задан файл из N целых компонентов. Сформировать новый файл, который будет состоять из сумм компонентов a1+aN, a2+aN-1, a3+aN-2, ..., ak+am для k<=m. Выдать содержимое полученного файла на экран.

  1. Сформировать файл из значений случайных величин. Определить для данной последовательности сумму компонентов, значения которых больше 0,4.

  1. 1. Составить программу, выполняющую заполнение файла 20 числами из диапазона от -35 до 15. Вывести их на экран. Подсчитать среднее арифметическое всех компонентов. 2. Составить программу, которая позволяет определять количество символов в указанном текстовом файле. Помогите пожалуйста написать программы, очень прошу))

  1. Записать в файл прямого доступа N действительных чисел. Найти наибольшее из модулей компонентов с нечетными номерами этого файла.

  1. Помогите, пожалуйста, написать программу. Используя нетипизированный параметр в подпрограмме, подсчитать суммы нечетных элементов векторов из 5 и 9 компонентов. Заранее спасибо всем кто откликнется.

  1. Заполнить файл F целыми числами,полученными с помощью генератора случайных чисел. Найти количество удвоенных нечетных чисел среди компонентов файла.Добавлено через 2 часа 42 минуты кто-нибудь!!!! неужели ни у кого нет идейки по написанию программки???

  1. Заполнит файл f натуральными числами, полеченными с помощью генератора случайных чисел. Найти количество удвоенных нечетных чисел среди компонентов файла

  1. Здравствуйте! Дан файл f , компоненты которого являются целыми числами Найти: Количество квадратов нечётных чисел среди компонентов.

  1. Надо срочно решить несколько задач, моя вечная благодарность решившему прилагается: 1)Составить программу для вычисления степеней чисел а^n, если a>MaxInt, n>10. 2)Заполнить файл f целыми числами, полученных с помощью генератора случайных чисел. Найти среди компонентов файла количество чисел, которые делятся на 2 но не делятся на 4. 3)Создать файл с текстом на английском языке. Выбрать из него те символы, которые встречаются только один раз, в том порядке в котором они встречаются в тексте.

  1. 1. Дан файл f, компоненты которого являются целыми числами. Найти наибольший и наименьший из компонентов файла


Нашли ошибку?
Развитие проекта
Яндекс.Метрика