1 Востаннє редагувалося magnevitis (25.03.2014 19:13:23)

Тема: Допоможіть зрозуміти формулу математично

Нам дана формула,я не розумію як вона працює,допоможіть будь-ласка(формулу прикріплено)
(Вибачте за погану якість, в першому над цією літерою "і+8" а внизу "х=і"; в другій формулі зверху "і+5" а знизу "х=і")

Post's attachments

IMG_20140325_190816.jpg 162.01 kb, 258 downloads since 2014-03-25 

2

Re: Допоможіть зрозуміти формулу математично

Великий знак, схожий на Е - то сума: http://uk.wikipedia.org/wiki/%D0%A1%D1%83%D0%BC%D0%B0

3

Re: Допоможіть зрозуміти формулу математично

Torbins написав:

Великий знак, схожий на Е - то сума: http://uk.wikipedia.org/wiki/%D0%A1%D1%83%D0%BC%D0%B0

А якщо б знизу було б х=2,тоді що це означало б?

4

Re: Допоможіть зрозуміти формулу математично

magnevitis написав:

А якщо б знизу було б х=2,тоді що це означало б?

початкове значення х дорівнює 2 і далі з кожним доданком збільшується на 1, же ну...

5

Re: Допоможіть зрозуміти формулу математично

Torbins написав:

Великий знак, схожий на Е - то сума: http://uk.wikipedia.org/wiki/%D0%A1%D1%83%D0%BC%D0%B0

Подивіться будь-ласка,чи правильно я написав программу,для цієї формули?

Program rrr;
var x,n,k : integer;
    a : real;
Begin
a:=0;
while x<=10 do
Begin
n:=1;
k:=1;
while n<=x do
 Begin
 k:=k*n;
 n:=n+2;
 end;
a:=a+5*sqr(x)/k;
x:=x+1;
end;
writeln(a);
end. 
Post's attachments

IMG_20140325_211356.jpg 113.48 kb, 288 downloads since 2014-03-25 

6

Re: Допоможіть зрозуміти формулу математично

magnevitis, не правильно

7

Re: Допоможіть зрозуміти формулу математично

То там факторіал у знаменнику ма бути?

" х! " ?

8

Re: Допоможіть зрозуміти формулу математично

Bartash написав:

То там факторіал у знаменнику ма бути?

" х! " ?

Так

9

Re: Допоможіть зрозуміти формулу математично

Replace написав:

magnevitis, не правильно

Підкажіть будь-ласка,де саме помилка?

10

Re: Допоможіть зрозуміти формулу математично

@magnevitis

Функціонал для обчислення факторіалу має бути таким (а не циклом).

function fac(n: longint):longint; 
begin 
if n<2 then fac:=1 
else fac:=n * fac(n-1) 
end; 

У вас має бути цикл від нижньої до верхньої межі послідовності (2..10, здс) з інтервалом 1, для кожної ітерації розраховується x^2/fac(x) і додається.

11

Re: Допоможіть зрозуміти формулу математично

Bartash написав:

@magnevitis

Функціонал для обчислення факторіалу має бути таким (а не циклом).

function fac(n: longint):longint; 
begin 
if n<2 then fac:=1 
else fac:=n * fac(n-1) 
end; 

У вас має бути цикл від нижньої до верхньої межі послідовності (2..10, здс) з інтервалом 1, для кожної ітерації розраховується x^2/fac(x) і додається.

Проблема в тому,що ми ще не проходили функціонал і тому задача зробити саме з використанням циклу...

12

Re: Допоможіть зрозуміти формулу математично

magnevitis написав:

Проблема в тому,що ми ще не проходили функціонал і тому задача зробити саме з використанням циклу...

Тоді цикл розрахунку факторіалу має міститися всередині загального циклу:

// Псевдокод

Цикл від 2 до 10 через 1
    Обчислити чисельник
    //Цикл для розрахунку факторіалу
    Цикл від 1 до Х через 1
        Домножуємо
    Весь цикл

    Обчислюємо елемент
    Додаємо елемент до загальної суми
Весь цикл

13

Re: Допоможіть зрозуміти формулу математично

Bartash написав:
magnevitis написав:

Проблема в тому,що ми ще не проходили функціонал і тому задача зробити саме з використанням циклу...

Тоді цикл розрахунку факторіалу має міститися всередині загального циклу:

// Псевдокод

Цикл від 2 до 10 через 1
    Обчислити чисельник
    //Цикл для розрахунку факторіалу
    Цикл від 1 до Х через 1
        Домножуємо
    Весь цикл

    Обчислюємо елемент
    Додаємо елемент до загальної суми
Весь цикл

А чи я можу написати попередній код з ось такими змінами:
9 стрічка:    n:=2;
13 стрічка:n:=n+1;
?

14

Re: Допоможіть зрозуміти формулу математично

Можете:

Program rrr;
var
  x, n, k: integer;
  a: real;
Begin
  a := 0;
  while x<=10 do
  Begin
    n := 2;
    k := 1;
    while n <= x do
    Begin
      k := k * n;
      n := n + 1;
    end;
    a := a + 5 * sqr(x) / k;
    x := x + 1;
  end;
  writeln(a);
end.

Але у цьому випадку рахунок почнеться з x=0.

Подякували: magnevitis1

15

Re: Допоможіть зрозуміти формулу математично

Torbins написав:

Можете:

Program rrr;
var
  x, n, k: integer;
  a: real;
Begin
  a := 0;
  while x<=10 do
  Begin
    n := 2;
    k := 1;
    while n <= x do
    Begin
      k := k * n;
      n := n + 1;
    end;
    a := a + 5 * sqr(x) / k;
    x := x + 1;
  end;
  writeln(a);
end.

Але у цьому випадку рахунок почнеться з x=0.

А якщо задати початковий х...як я розумію по формулі потрібен 2?

16

Re: Допоможіть зрозуміти формулу математично

Тоді усе має бути нормально. У кінці-кінців вам ніхто не заважає порахувати результат на листочку, а потім порівняти із тим, що видає ваша програма.

Подякували: magnevitis1

17

Re: Допоможіть зрозуміти формулу математично

Torbins написав:

Тоді усе має бути нормально. У кінці-кінців вам ніхто не заважає порахувати результат на листочку, а потім порівняти із тим, що видає ваша програма.

І маленьке питання...а де саме потрібно вставляти "х:=2" ?

18

Re: Допоможіть зрозуміти формулу математично

Звісно перед першим циклом, який його використовує.

Подякували: magnevitis1

19

Re: Допоможіть зрозуміти формулу математично

Torbins написав:

Звісно перед першим циклом, який його використовує.

Дякую велике,вже знайшов методом спроб та помилок