Вычислить сумму - Помощь студентам

help_me_pls · 20.01.2017, 09:14

На языке ABC pascal нужно написать программу

Аватар · 20.01.2017, 09:30

Код:

p:=z*z; r:=p; s:=p; k:=1; while r>=Eps do begin Inc(k); r:=r*(2*k-1)*p/k/(2*k-3); s:=s+r; end;

20.01.2017, 09:30	#2
Аватар Старожил Регистрация: 17.11.2010 Сообщений: 18,922	Код: `p:=zz; r:=p; s:=p; k:=1; while r>=Eps do begin Inc(k); r:=r(2k-1)p/k/(2*k-3); s:=s+r; end;` Если бы архитекторы строили здания так, как программисты пишут программы, то первый залетевший дятел разрушил бы цивилизацию

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Три задачи - Найти сумму натуральных чисел; Протабулировать функцию; вычислить сумму	kolya1114	Паскаль, Turbo Pascal, PascalABC.NET	3	01.12.2012 19:01
Вычислить сумму	rapprozi	Помощь студентам	1	11.05.2012 23:30
Вычислить сумму в БД	lady.ulumba	Помощь студентам	2	22.04.2012 15:44
Вычислить сумму	lady.ulumba	Помощь студентам	4	16.10.2011 18:38
Вычислить сумму	Balda1111	Паскаль, Turbo Pascal, PascalABC.NET	2	12.04.2011 13:36