Форум программистов, компьютерный форум, киберфорум
Наши страницы
Free Pascal
Войти
Регистрация
Восстановить пароль
 
Кучерявая_Ксю
0 / 0 / 0
Регистрация: 13.10.2009
Сообщений: 38
#1

интерационные процессы - Free Pascal

13.10.2009, 09:45. Просмотров 492. Ответов 1
Метки нет (Все метки)

[IMG]http://i023.***********/0910/16/6f807d47dbe2.jpg[/IMG]

Добавлено через 10 минут
народ буду благодарна за помощь... очень прошу помогите!!!
0
Лучшие ответы (1)
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
Similar
Эксперт
41792 / 34177 / 6122
Регистрация: 12.04.2006
Сообщений: 57,940
13.10.2009, 09:45
Я подобрал для вас темы с готовыми решениями и ответами на вопрос интерационные процессы (Free Pascal):

интерационные циклы
задание зачёт горит!!!!!!!!!!!

Разветвляющиеся процессы
Даны отрезки a, b, c. Составить программу для определения: возможности...

Циклические процессы
Добрый день. Помогите пожалуйста с задачками. Заранее спасибо. Найти сумму...

Циклические процессы
Задача изложена на скрине: Заранее очень благодарен!!!

Циклические процессы.
Ребят, помогите, пожалуйста, вот с этой задачкой:

случайные процессы
Помогите пожалуйста!!!, TPascal случайные процессы Задача:В автоколонне 25...

1
Puporev
Модератор
54146 / 41779 / 28885
Регистрация: 18.05.2008
Сообщений: 98,327
13.10.2009, 11:49 #2
Лучший ответ Сообщение было отмечено Кучерявая_Ксю как решение

Решение

Решаем используя рекуррентные соотношения:
в числителе X(i)=X(i-1)*x
в знаменателе Fact(i)=Fakt(i-1)*i
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
uses crt;
var x,t,s:real;
    n,i:word;
begin
clrscr;
write('Введите х=');
readln(x);
repeat
write('Введите натуральное число больше 1 n=');
readln(n);
until n>1;
s:=0;{начальная сумма}
t:=x;{начальное значение x^i при i=1}
for i:=2 to n do{начинаем с двух}
 begin
  t:=t*x/(i-1);{домножаем на х(увеличиваем степень и делим на i(увеличиваем факториал знаменателя))}
  s:=s+t*(2*i);{прибавляем, домножив на 2*i}
 end;
write('Сумма=',s:0:5);
readln
end.
1
MoreAnswers
Эксперт
37091 / 29110 / 5898
Регистрация: 17.06.2006
Сообщений: 43,301
13.10.2009, 11:49
Привет! Вот еще темы с решениями:

Циклические процессы
Вычислить произведение P=∏_(k=1)^n(k/(k+1) -(〖cos〗^k)x) кому не понятна...

Циклические процессы
в одномерном массиве вычислить сумму эдементов, значение которых кратны...

Циклические вычислительные процессы
Program z2; var A,B,x: real; Begin writeln('Enter A,B,x,A>B'); ...

Циклические вычислительные процессы
помогите пожалуйста,новичок в Паскале 1. Вычислить значения функции F(x) на...


Искать еще темы с ответами

Или воспользуйтесь поиском по форуму:
2
Ответ Создать тему
Опции темы

КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin® Version 3.8.9
Copyright ©2000 - 2018, vBulletin Solutions, Inc.
Рейтинг@Mail.ru