Форум программистов
 

Восстановите пароль или Зарегистрируйтесь на форуме, о проблемах и с заказом рекламы пишите сюда - alarforum@yandex.ru, проверяйте папку спам!

Вернуться   Форум программистов > Delphi программирование > Паскаль, Turbo Pascal, PascalABC.NET
Регистрация

Восстановить пароль
Повторная активизация e-mail

Купить рекламу на форуме - 42 тыс руб за месяц

Закрытая тема
Ваша тема закрыта, почему это могло произойти? Возможно,
Нет наработок или кода, если нужно готовое решение - создайте тему в разделе Фриланс и оплатите работу.
Название темы включает слова - "Помогите", "Нужна помощь", "Срочно", "Пожалуйста".
Название темы слишком короткое или не отражает сути вашего вопроса.
Тема исчерпала себя, помните, один вопрос - одна тема
Прочитайте правила и заново правильно создайте тему.
 
Опции темы Поиск в этой теме
Старый 10.03.2012, 11:31   #1
irischka-ps
Новичок
Джуниор
 
Регистрация: 10.03.2012
Сообщений: 1
По умолчанию Программирование вычисления суммы и произведения

Помогите, пожалуйста написать программы
Изображения
Тип файла: jpg 1.jpg (9.5 Кб, 186 просмотров)
irischka-ps вне форума
Старый 10.03.2012, 15:29   #2
VIK_aka_TOR
Участник клуба
 
Аватар для VIK_aka_TOR
 
Регистрация: 30.01.2011
Сообщений: 1,578
По умолчанию

1.
Код:
const n  = 6;
  x = 0.15;
var 
sum : real;
i :integer;
begin
  sum := 0;
  for i:=1 to n do
    if ((i + 1) mod 2) = 0 then
      sum := sum  +  exp((2 * i + 1) * ln(x) )/ ( 4 * sqr(i) + 1)
    else 
      sum := sum  -  exp((2 * i + 1) * ln(x) )/ ( 4 * sqr(i) + 1);
  writeln(sum);  
end.
2.
Код:
const k  = 4;
var 
rez : real;
i :integer;
begin
  rez := 1;
  for i:=1 to k do
    if ( i mod 2) = 0 then
      rez := rez *( 1/ (( 2 * i + 1) * i) +1)
    else  rez := rez * ((-1)/ (( 2 * i + 1) * i) +1);
  writeln(rez);  
end.
пишу код не только за печеньки
VIK_aka_TOR вне форума
Старый 11.03.2012, 20:45   #3
Paster Fob
Форумчанин
 
Аватар для Paster Fob
 
Регистрация: 06.02.2011
Сообщений: 105
По умолчанию

сколько пытался решать подобные задачи,но даже не представляю с чего начать,и вообще что это вообще такое.Все операторы в решении знакомые.А вот как вообще эти формулы решать не знаю.
Paster Fob вне форума
Старый 11.03.2012, 21:33   #4
VIK_aka_TOR
Участник клуба
 
Аватар для VIK_aka_TOR
 
Регистрация: 30.01.2011
Сообщений: 1,578
По умолчанию

Цитата:
Сообщение от Paster Fob Посмотреть сообщение
сколько пытался решать подобные задачи,но даже не представляю с чего начать,и вообще что это вообще такое.Все операторы в решении знакомые.А вот как вообще эти формулы решать не знаю.
E - это сумма элементов...
П - произведение элементов...
от каких значений изменяется параметр указывается снизу... сверху до каких... математику и сам не особо люблю... но программирование помогает узнавать новое и об математике... со временем придет...)
пишу код не только за печеньки
VIK_aka_TOR вне форума
Старый 01.04.2012, 21:58   #5
Vertopuz
Новичок
Джуниор
 
Регистрация: 25.03.2012
Сообщений: 2
По умолчанию

помогите мне тоже пожалуйста)
Vertopuz вне форума
Закрытая тема


Купить рекламу на форуме - 42 тыс руб за месяц

Опции темы Поиск в этой теме
Поиск в этой теме:

Расширенный поиск


Похожие темы
Тема Автор Раздел Ответов Последнее сообщение
Составить алгоритм вычисления суммы и произведения ряда FOrus101 Помощь студентам 1 19.02.2012 19:33
Вычисление суммы и произведения Matveev Паскаль, Turbo Pascal, PascalABC.NET 6 18.03.2011 12:42
составить програму для вычисления произведения полож. элементов Katyaaa Помощь студентам 1 12.01.2011 10:36
Паскаль.Программирование задач нахождение суммы и произведения Яська Помощь студентам 1 07.12.2009 18:16
Программирование задач нахождение суммы и произведения Яська Помощь студентам 1 29.11.2009 11:12