Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
2285811
25.11.2021 08:07 •
Информатика
Надо! составить программу для вычисления суммы ряда с точностью до ε = 10^-4. s = 1 + 3x + 5x^2 + 7x^3 + полученный результат сравнить с точным s = (1 + x)/(1-x)^2.
Показать ответ
Ответ:
GDA1
08.10.2020 15:41
Begin
var e: double;
var s1: double;
var s2: double;
var x: double;
var step: integer;
readln(x);
e := 0.0001;
s1 := 1;
step := 3;
s2 := (1 + x) / (1 - x) / (1 - x);
while abs(s1 - s2) > e do begin
s1 := s1 + (1 + 2*step)/power(x, step);
end;
writeln(s1);
writeln(s2);
writeln(s1 - s2);
end.
Расставь правильно скобки в условии, я исправлю решение.
0,0
(0 оценок)
Популярные вопросы: Информатика
lolkek3023
06.06.2023 04:44
сделайте программу, которая будет считать это. (выражение справа) ПаскальЧерез циклы...
Артур13487в158168
12.11.2021 19:10
Определите длину кратчайшего пути между пунктами А и G (при условии, что передвигаться можно только по построенным дорогам)...
liliannaklochko
09.03.2021 17:12
Нурсауле и Нурганым создали рисунки, используя знакомые им графические редакторы, и распечатали их на принтере. Рисунок Нурсауле получился более четче и качественнее, чем у...
myzroman
25.02.2020 18:47
Решите логические уравнения при A=0, B=1. ¬ ( (A → R) → ¬ B V ¬ (A ≡ ¬ B) ) = 1 У переменной R может быть 4 состояния: 1, 0, «любой вариант» или «нет решения»....
Ninick
24.03.2023 05:17
Укажите количество ячеек в диапазоне А3 С5там нет картины в соре...
ALDIAR11
24.04.2023 09:54
4. Напишите в листе табличного редактора столбиком следующие понятия: длина, сила тока, сила, количество вещества, скорость, время, ускорение, давление, масса, энергия. В соседних...
Qqertyi
23.09.2021 13:07
Каковы возможные последствия неисправности компьютера? Нужно сегодня это сор когда получу если кто то ответит правильно и я получу 7/7 то зделаю лучшим ответом...
Брат111111111
17.04.2023 19:00
1. в зависимости от изображения чисел системы счисления делятся на: а. позиционные и непозиционные; б. арабские и римские; с. древние и современные; 2. двоичная система счисления...
КоТоФеЙкА03
10.10.2022 17:32
Оч много 1)сообщение занимает 6 страниц по 40 строк, в каждой строке записано по 60 символов. информационный объём всего сообщения равен 9000 байтам. какой информационный вес...
Lloid1612
14.02.2020 22:37
Справочное пособие по языку 4 класс стр 273 диктант4 а то пособие мальчик забрал...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
var e: double;
var s1: double;
var s2: double;
var x: double;
var step: integer;
readln(x);
e := 0.0001;
s1 := 1;
step := 3;
s2 := (1 + x) / (1 - x) / (1 - x);
while abs(s1 - s2) > e do begin
s1 := s1 + (1 + 2*step)/power(x, step);
end;
writeln(s1);
writeln(s2);
writeln(s1 - s2);
end.
Расставь правильно скобки в условии, я исправлю решение.