##var sumOfAP := function(a1, an, d: real):real → (a1 + an)/2*((an - a1)/d+1);var (a, b) := ReadInteger2('Введите a и b:');var sE := sumOfAP(a + a mod 2, b - b mod 2, 2);var sO := sumOfAP(a + 1 - a mod 2, b - 1 + b mod 2, 2);Print('Результат:', sE - sO)
Пояснение:
Используется формула для нахождения суммы первых n членов арифметической прогрессии: , где — первый член прогрессии, — последний член, —разность прогрессии.
sumOfAP -- функция расчёта суммы арифметической прогрессии.(a, b) -- вводимые числа.ReadInteger2(prompt) -- выводит приглашение к вводу prompt и возвращает кортеж из двух значений типа integer, введенных с клавиатуры.sE и sO -- "sum of Even" и "sum of Odd", сумма чётных и сумма нечётных соответственно.Print -- выводит значения на экран, после каждого значения выводит пробел.
повышение эффективности управления объектом на основе роста производительности труда и совершенствования методов планирования процесса управления. Различают автоматизированные системы управления объектами (технологическими процессами — АСУТП, предприятием — АСУП, отраслью — ОАСУ) и функциональные автоматизированные системы, например, проектирование плановых расчётов, материально-технического снабжения и т. д\
Функции обработки информации (вычислительные функции) — осуществляют учет, контроль, хранение, поиск, отображение, тиражирование, преобразование формы информации;
Функции обмена (передачи) информации — связаны с доведением выработанных управляющих воздействий до ОУ и обменом информацией с ЛПР;
Группа функций принятия решения (преобразование содержания информации) — создание новой информации в ходе анализа, прогнозирования или оперативного управления объектом
PascalABC.NET 3.7:
##var sumOfAP := function(a1, an, d: real):real → (a1 + an)/2*((an - a1)/d+1);var (a, b) := ReadInteger2('Введите a и b:');var sE := sumOfAP(a + a mod 2, b - b mod 2, 2);var sO := sumOfAP(a + 1 - a mod 2, b - 1 + b mod 2, 2);Print('Результат:', sE - sO)Пояснение:
Используется формула для нахождения суммы первых n членов арифметической прогрессии:
, где 
— первый член прогрессии, 
— последний член, 
—разность прогрессии.
sumOfAP -- функция расчёта суммы арифметической прогрессии.(a, b) -- вводимые числа.ReadInteger2(prompt) -- выводит приглашение к вводу prompt и возвращает кортеж из двух значений типа integer, введенных с клавиатуры.sE и sO -- "sum of Even" и "sum of Odd", сумма чётных и сумма нечётных соответственно.Print -- выводит значения на экран, после каждого значения выводит пробел.повышение эффективности управления объектом на основе роста производительности труда и совершенствования методов планирования процесса управления. Различают автоматизированные системы управления объектами (технологическими процессами — АСУТП, предприятием — АСУП, отраслью — ОАСУ) и функциональные автоматизированные системы, например, проектирование плановых расчётов, материально-технического снабжения и т. д\
Функции обработки информации (вычислительные функции) — осуществляют учет, контроль, хранение, поиск, отображение, тиражирование, преобразование формы информации;
Функции обмена (передачи) информации — связаны с доведением выработанных управляющих воздействий до ОУ и обменом информацией с ЛПР;
Группа функций принятия решения (преобразование содержания информации) — создание новой информации в ходе анализа, прогнозирования или оперативного управления объектом
Объяснение: