Программа с использованием подпрограмм - функций

@Norbes · Регистрация: 16.03.2018

Author24 — интернет-сервис помощи студентам

z=1-S/2 где S=∑_(n=0)^∞ 2ⁿ(a_n²-b_n²)

a_n=1/2(a_n-1+b_n-1)

b_n=√(a_n-1*b_n-1)

Значение a₀ и b₀ заданы. Расчёт закончить при выполнении условия a_n²-b_n²<Q

Дано: a₀=3
b₀=2
Q=10^-5

Помогите пожалуйста

@ZX Spectrum-128 · 18.03.2018, 07:56

Norbes, формулу наберите, пожалуйста, в редакторе формул.

@eaa · 20.03.2018, 07:02

Pascal

begin
  var a0 := 3.0;
  var b0 := 2.0;
  var q := 1e-5;
  var SeqAB := SeqWhile((a0, b0), x -> ((x[0] + x[1]) / 2, Sqrt(x[0] * x[1])), x -> Sqr(x[0]) - Sqr(x[1]) >= q);
  SeqAB.Println(NewLine);
  var s := SeqAB.Select((x, i)-> (1 shl i) * (Sqr(x[0]) - Sqr(x[1]))).Sum;
  Println('s =',s);
  var z:=1-s/2;
  Println('z =',z)
end.

@Norbes · 20.03.2018, 23:45 **[ТС]**

Спасибо большое, добрый человек.

@Norbes · 01.04.2018, 16:48 **[ТС]**

Одни вопросик, оператор -> в паскале выполняет ту же функцию, что и в c++? (оператор -> «стрелка» используются для обращения к отдельным элементах структур и объединений. Структуры и объединения объединяют типы данных под одним именем.).

@ZX Spectrum-128 · 01.04.2018, 17:20

В Паскале вообще нет такого. К элементам записей обращение через .
Что уж там намудрили в pabc.net, не знаю.

@Norbes · 01.04.2018, 17:34 **[ТС]**

Информации про этот оператор в паскале нет, в сишке есть, но как-то код работает в паскале.

@Hitoku · 01.04.2018, 17:49

Norbes, оператор -> в PABC.Net является аналогом => в C#
Оператор => (справочник по C#)

@Norbes · 01.04.2018, 18:04 **[ТС]**

Hitoku, спасибо большое.

Новые блоги и статьи
Как подключить JavaScript файл в другом JavaScript файле InfoMaster 20.01.2025 В современной веб-разработке организация кодовой базы играет ключевую роль в создании масштабируемых и поддерживаемых приложений. Модульность и правильное структурирование кода стали неотъемлемыми. . .	Как откатить изменения в исходниках, не внесенные в Git InfoMaster 20.01.2025 При работе с системой контроля версий Git разработчики часто сталкиваются с необходимостью отменить внесенные изменения в исходном коде. Особенно актуальной становится ситуация, когда изменения еще. . .	В чем разница между px, in, mm, pt, dip, dp, sp InfoMaster 20.01.2025 В мире цифрового дизайна и разработки интерфейсов правильный выбор единиц измерения играет ключевую роль в создании качественного пользовательского опыта. История развития систем измерений для. . .	Как изменить адрес удалённого репозитория (origin) в Git InfoMaster 20.01.2025 В терминологии Git термин origin является стандартным именем для основного удаленного репозитория, с которым взаимодействует локальная копия проекта. Когда разработчик клонирует репозиторий с. . .	Как переместить последние коммиты в новую ветку (branch) в Git InfoMaster 20.01.2025 При работе над проектом часто возникают ситуации, когда необходимо изолировать определенные изменения от основной линии разработки. Это может быть связано с экспериментальными функциями, исправлением. . .	Как вернуть результат из асинхронной функции в JavaScript InfoMaster 20.01.2025 Асинхронное программирование представляет собой фундаментальную концепцию в JavaScript, которая позволяет выполнять длительные операции без блокировки основного потока выполнения программы. В. . .
Какой локальный веб-сервер выбрать InfoMaster 19.01.2025 В современной веб-разработке локальные веб-серверы играют ключевую роль, предоставляя разработчикам надежную среду для создания, тестирования и отладки веб-приложений без необходимости использования. . .	Почему планшеты и iPad уже не так популярны, как раньше InfoMaster 19.01.2025 Эра революционных инноваций История планшетов началась задолго до того, как эти устройства стали привычными спутниками нашей повседневной жизни. В начале 1990-х годов появились первые прототипы,. . .	Как самому прошить BIOS ноутбука InfoMaster 19.01.2025 BIOS (Basic Input/ Output System) представляет собой важнейший компонент любого компьютера или ноутбука, который обеспечивает базовое взаимодействие между аппаратным и программным обеспечением. . .	Какой Linux выбрать для домашнего компьютера InfoMaster 19.01.2025 Современные реалии выбора операционной системы В современном мире выбор операционной системы для домашнего компьютера становится все более важным решением, которое может существенно повлиять на. . .	Как объединить два словаря одним выражением в Python InfoMaster 19.01.2025 В мире программирования на Python работа со словарями является неотъемлемой частью разработки. Словари представляют собой мощный инструмент для хранения и обработки данных в формате "ключ-значение". . . .	Как без исключения проверить существование файла в Python InfoMaster 19.01.2025 При разработке программного обеспечения на Python часто возникает необходимость проверить существование файла перед выполнением операций с ним. Это критически важная задача, которая помогает избежать. . .

Программа с использованием подпрограмм - функций

Решение

Решение

@Norbes 0 / 0 / 0 Регистрация: 16.03.2018 Сообщений: 14
		1
	Программа с использованием подпрограмм - функций 17.03.2018, 12:56. Показов 1072. Ответов 8 Метки нет (Все метки) z=1-S/2 где S=∑_(n=0)^∞ 2ⁿ(a_n²-b_n²) a_n=1/2(a_n-1+b_n-1) b_n=√(a_n-1*b_n-1) Значение a₀ и b₀ заданы. Расчёт закончить при выполнении условия a_n²-b_n²<Q Дано: a₀=3 b₀=2 Q=10^-5 Помогите пожалуйста 0

@ZX Spectrum-128 6811 / 4568 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	18.03.2018, 07:56	2
	Norbes, формулу наберите, пожалуйста, в редакторе формул. 0

@Norbes 0 / 0 / 0 Регистрация: 16.03.2018 Сообщений: 14
	20.03.2018, 23:45 [ТС]	4
	Спасибо большое, добрый человек. 0

@Norbes 0 / 0 / 0 Регистрация: 16.03.2018 Сообщений: 14
	01.04.2018, 16:48 [ТС]	5
	Одни вопросик, оператор -> в паскале выполняет ту же функцию, что и в c++? (оператор -> «стрелка» используются для обращения к отдельным элементах структур и объединений. Структуры и объединения объединяют типы данных под одним именем.). 0

@ZX Spectrum-128 6811 / 4568 / 4819 Регистрация: 05.06.2014 Сообщений: 22,438
	01.04.2018, 17:20	6
	В Паскале вообще нет такого. К элементам записей обращение через . Что уж там намудрили в pabc.net, не знаю. 0

@Norbes 0 / 0 / 0 Регистрация: 16.03.2018 Сообщений: 14
	01.04.2018, 17:34 [ТС]	7
	Информации про этот оператор в паскале нет, в сишке есть, но как-то код работает в паскале. 0

@Hitoku 1755 / 1347 / 1407 Регистрация: 28.10.2016 Сообщений: 4,267
	01.04.2018, 17:49	8
	Сообщение было отмечено ZX Spectrum-128 как решение Решение Norbes, оператор `->` в PABC.Net является аналогом `=>` в C# Оператор => (справочник по C#) 1

@Norbes 0 / 0 / 0 Регистрация: 16.03.2018 Сообщений: 14
	01.04.2018, 18:04 [ТС]	9
	Hitoku, спасибо большое. 0