Сумму бесконечного ряда можно вычислить только приближенно (с определенной степенью точности).
slag — текущее слагаемое
write(‘Введите точность вычислений: ‘);
в избранное ссылка отблагодарить
Грустный Роджер [400K]
Не уверен, что этот алгоритм верен. Ведь вы оцениваете точность только по последнему слагаемому, тогда как сумма этого последнего и всех, которые за ним, теоретически может превышать установленную погрешность. То есть без предварительного исследования сходимости ряда тут не обойтись. — 3 года назад
Александр Погребняк [11.2K]
Это стандартный способ вычисления суммы бесконечного ряда.
А факт сходимости этого ряда виден «невооруженным взглядом».
Или вы считаете, что в 10 классе по программированию рассматриваются задачи, предполагающие настолько глубокий анализ?
Даже в таком виде 99,99% учеников обычного 10 класса не смогут предоставить решение — 3 года назад
Источник: www.bolshoyvopros.ru
Составить программу действий и вычислить (математика 3 класс)
Программа вычисления суммы
Задача 2.4
Написать программу для вычисления суммы по формуле:
S = (1*2) / (3*4) + (3*4) / (5*6) + … + (85*86) / (87*88)
Хотя в учебнике, из которого я взял эту задачу, она помечена звёздочкой (что означает средний уровень сложности), особых затруднений её решение не должно вызвать даже у новичка, если, конечно, он знает, что такое циклы.
Итак, как вы уже догадались, составить программу вычисления суммы по заданной выше формуле можно, используя цикл.
Алгоритм будет несложным. Мы используем четыре переменных для работы с множителями и одну переменную (Sum) для вычисления суммы:
- Сначала мы определяем первый множитель (n1) и присваиваем ему значение 1.
- Затем в цикле:
- Увеличиваем значения остальных множителей (n2, n3, n4) таким образом, чтобы в первой итерации n2, n3 и n4 были равны соответственно 2, 3 и 4. А последующих итерациях они также будут зависеть от значения первого множителя n1.
- Вычисляем выражение (n1 * n2) / (n3 * n4) и прибавляем его к значению переменной Sum.
Ниже приведены решения на Паскале и С++.
Решение задачи 2.4 на Паскале
program summa; const MAX_NUM = 85; //**************************************************************** // ГЛОБАЛЬНЫЕ ПЕРЕМЕННЫЕ //**************************************************************** var n1, n2, n3, n4 : Integer; Sum : Single; //**************************************************************** // ОСНОВНАЯ ПРОГРАММА //**************************************************************** begin Sum := 0; n1 := 1; while n1 Inc(n1, 2); end; WriteLn(‘Summa = ‘, Sum:0:4); WriteLn(‘The end. Press ENTER. ‘); ReadLn; end.
Решение задачи 2.4 на С++
#include #include using namespace std; const int MAX_NUM = 85; //**************************************************************** // ОСНОВНАЯ ПРОГРАММА //**************************************************************** int main(int argc, char *argv[]) < int n1, n2, n3, n4; float Sum; Sum = 0; n1 = 1; while (n1 Sum = Sum + float(n1 * n2) / float(n3 * n4); n1 = n1 + 2; > cout
Как составить программу действий и вычислить?
ВАЖНО! Обратите внимание на строку в примере на С++, которая выделена красным цветом.
Результат выражений (n1 * n2) и (n3 * n4) мы явно преобразуем к типу float. Если этого не сделать, то деление первого выражения на второе вернёт ноль, так как n1. n4 — это целочисленные переменные. Поэтому нам надо либо объявлять n1. n4 как float, либо явно преобразовывать их в тип float. Вот такой вот С++ заморочистый язык.
Источник: info-master.su
Составить программу для вычисления выражения a-действительное, m-целое, используя функцию для возведения — Pascal
Составить программу для вычисления выражения a-действительное, m-целое, используя функцию для возведения действительного числа в целую степень.
Function Step(n: integer; x: real):real; Var i: integer; y: real; Begin y:=1; for i:=1 to n do y:=y*x; Step:=y; End;
Код к задаче: «Составить программу для вычисления выражения a-действительное, m-целое, используя функцию для возведения»
Листинг программы
function step(n: integer; x: real): real; var i: integer; y: real; begin y := 1; for i := 1 to n do y := y * x; step := y end; var a, z: real; m: integer; begin write(‘a = ‘); readln(a); write(‘m = ‘); readln(m); if ((a = 0) and (m = 0)) or (a = -4) then writeln(‘Function is undefined.’) else begin if m = 0 then z := 1 else if m < 0 then z := step(5 * abs(m), 1 / a) else z := step(5 * m, a); z := (z + step(5, 1 / (a — 1))) / 2 / step(6, a + 4); write(‘z = ‘, z) end; readln end.
Источник: studassistent.ru