Понятно, что тут нужен цикл для суммирования четырех членов вида
A²ˣ⁺¹ / [(2*х+1)*B²ˣ], х = 1, 2, 3, 4 и тут есть два варианта. Первый - считать, как написано. И на сегодня это правильный вариант, поскольку видна исходная формула. Второй - завести две добавочные переменные, в одну поместить A³, во вторую В². А затем получать следующие степени, домножая каждый раз на А² и В соответственно. Но это растянет программу и скроет исходную формулу от восприятия, что затруднит поиск ошибок. К счастью, современная версия языка Pascal - PascalABC.NET - обзавелась операцией возведения в степень и на ней прграмма будет выглядеть очень просто.
Моде́ль — система, исследование которой служит средством для получения информации о другой системе; представление некоторого реального процесса, устройства или концепции.
Модели́рование — исследование объектов познания на их моделях; построение и изучение моделей реально существующих объектов, процессов или явлений с целью получения объяснений этих явлений, а также для предсказания явлений, интересующих исследователя.
Формализа́ция — представление какой-либо содержательной области (рассуждений, доказательств, процедур классификации, поиска информации, научных теорий) в виде формальной системы или исчисления.
![Постройте таблицу истинности для заданного логического выражения . [3]8(1) Составьте логическую схем](/tpl/images/3940/9704/d70a0.jpg)
Понятно, что тут нужен цикл для суммирования четырех членов вида
A²ˣ⁺¹ / [(2*х+1)*B²ˣ], х = 1, 2, 3, 4 и тут есть два варианта. Первый - считать, как написано. И на сегодня это правильный вариант, поскольку видна исходная формула. Второй - завести две добавочные переменные, в одну поместить A³, во вторую В². А затем получать следующие степени, домножая каждый раз на А² и В соответственно. Но это растянет программу и скроет исходную формулу от восприятия, что затруднит поиск ошибок. К счастью, современная версия языка Pascal - PascalABC.NET - обзавелась операцией возведения в степень и на ней прграмма будет выглядеть очень просто.
===== PascalABC.NET =====
begin
var (a, b) := ReadReal2('Введите А и В:');
var y := SeqGen(4, x -> A ** (2 * x + 1) /
((2 * x + 1) * B ** (2 * x)), 1).Sum;
y.Println
end.
Моде́ль — система, исследование которой служит средством для получения информации о другой системе; представление некоторого реального процесса, устройства или концепции.
Модели́рование — исследование объектов познания на их моделях; построение и изучение моделей реально существующих объектов, процессов или явлений с целью получения объяснений этих явлений, а также для предсказания явлений, интересующих исследователя.
Формализа́ция — представление какой-либо содержательной области (рассуждений, доказательств, процедур классификации, поиска информации, научных теорий) в виде формальной системы или исчисления.