сумма - Помощь студентам

molli · 06.11.2012, 09:49

Вычислить (1+sin0.1)(1+sin0.2)...(1+sin10)

molli · 06.11.2012, 09:50

Вычислить (1+sin0.1)(1+sin0.2)...(1+sin10) нужен код на паскале

VIK_aka_TOR · 06.11.2012, 10:58

Код:

s := 1;
i := 0,1;
while i <= 10 do
begin
  s := s *( 1 +  sin(i));
  i := i + 0,1;
end;

p.s. sin(i) - вычисляется в радианах...

06.11.2012, 09:49	#1
molli Заблокирован Регистрация: 06.11.2012 Сообщений: 3	сумма Вычислить (1+sin0.1)(1+sin0.2)...(1+sin10)

06.11.2012, 10:58	#3
VIK_aka_TOR Участник клуба Регистрация: 30.01.2011 Сообщений: 1,578	Код: `s := 1; i := 0,1; while i <= 10 do begin s := s ( 1 + sin(i)); i := i + 0,1; end;` p.s. sin(i) - вычисляется в радианах... пишу код не только за печеньки Последний раз редактировалось VIK_aka_TOR; 06.11.2012 в 11:02.*

Похожие темы
Тема	Автор	Раздел	Ответов	Последнее сообщение
Сумма с несколькими критериями, подсчёт/сумма нечётных чисел	XPsihopaTX	Microsoft Office Excel	3	11.10.2012 15:00
Delphi7. Задача - Дана сумма вклада, процентная ставка, вычислить процент прибыли и общая сумма через заданный срок	NeedPro	Помощь студентам	7	19.05.2012 19:35
Сумма	Газовый	Microsoft Office Excel	6	22.06.2010 09:29
Сумма	ARTEGA	Общие вопросы Delphi	7	20.04.2010 21:21
Сумма	RIP VIP	Помощь студентам	8	02.05.2008 14:33

06.11.2012, 09:50	#2
molli Заблокирован Регистрация: 06.11.2012 Сообщений: 3	Вычислить (1+sin0.1)(1+sin0.2)...(1+sin10) нужен код на паскале