|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу. Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста". Название темы слишком короткое или не отражает сути вашего вопроса. Тема исчерпала себя, помните, один вопрос - одна тема Прочитайте правила и заново правильно создайте тему. |
|
Опции темы | Поиск в этой теме |
20.11.2020, 12:51 | #1 |
Регистрация: 18.10.2020
Сообщений: 7
|
Прошу помогите решить задачу в Pascal. Срочно!!!! По теме "циклы с неизвестным числом повторени"
Вычислить сумму 1+1/2^2+1/3^2+1/4^2+... с точностью ε> 0 и определить значение числа пи если известно, что эта бесконечная сумма приближается к числу пи^2/6.
Задача по теме "циклы с неизвестным числом повторений". Вот не большая наработка по этой же теме но для другой задачи, надеюсь оно вам поможет. Учитель сказал чтобы я решал такимже способом, но у меня неполучаеться, буду очень блогодарен за решение. var genres : real; var e, res1, res2:real; var i:integer; begin genres:=0; write ('Введите значение e:'); read(e); if e<0 then write('go back'); i:=1; res1 := 1/(i*(i+1)); res2 := 1/((i+1)*(i+2)); while abs(res2-res1)<=e do begin res1 := 1/(i*(i+1)); res2 := 1/((i+1)*(i+2)); genres := genres + res1; i := i + 1; end; write (genres); end. |
20.11.2020, 14:09 | #2 |
Высокая репутация
СуперМодератор
Регистрация: 27.07.2008
Сообщений: 15,547
|
В следующий раз думайте лучше над названием темы.
E-Mail: arigato.freelance@gmail.com
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Прошу помогите решить задачу в Pascal. Срочно!!!! По теме "ПРОГРАММЫ разветвленной структурой" | Danilzp | Помощь студентам | 0 | 19.10.2020 17:11 |
Прошу помогите решить задачу в Pascal. Срочно!!!! По теме Цикла с параметром | Danilzp | Помощь студентам | 1 | 18.10.2020 11:39 |
Не могу решить задачу по теме "Тернарный поиск ", помогите, пж | Icare | Общие вопросы C/C++ | 0 | 07.04.2019 20:40 |
"Циклы с неизвестным числом повторений" | obayashka | Паскаль, Turbo Pascal, PascalABC.NET | 3 | 20.01.2011 15:37 |