Вычислить приближенное значение бесконечной суммы с заданной точностью

@SnapeEye · Регистрация: 16.05.2013

Делал такую программу:
Вычислить приближенное значение бесконечной суммы с точностью до e=0.0005
$https://www.cyberforum.ru/cgi-bin/latex.cgi?1-\frac{1}{2^4}+\frac{1}{3^4}-...\pm \frac{1}{n^4}\mp ...$

Сделал следующий код:

Pascal

Program lab6;
Uses Crt;
const
  e=0.0005;
var
  i,n,S:integer;
  z:integer; {какой тип данных тут?}
  memb:integer; {какой тип данных тут?}
Begin
  i:=1;
  S:=1;
    while abs (n)>e do
      Begin
        memb:=z/sqr(sqr(i));
        S:=S+memb;
        z:=-z;
        i:=i+1;
      end;
  WriteLn('S= ',S);
  ReadLn;
end.

В чем заключается моя ошибка? Какой тип данных в тех местах (указано в коде)?

quwy · 15.09.2014, 17:56

Все должно быть Real. Переменная n не инициализирована.

@SnapeEye · 15.09.2014, 18:06 **[ТС]**

Сообщение от quwy

Переменная n не инициализирована.

Не понял, это как?

@Puporev · 15.09.2014, 18:08

Не по теме:

Каким ты был, таким ты и остался...

quwy · 15.09.2014, 18:13

Сообщение от SnapeEye

Не понял, это как?

Чему равна n в начале цикла?

@SnapeEye · 15.09.2014, 18:22 **[ТС]**

Сообщение от quwy

Чему равна n в начале цикла?

По идее, n должно быть равно числу, которое введёт пользователь? Или я ошибаюсь?

quwy · 15.09.2014, 18:37

Сообщение от SnapeEye

о идее, n должно быть равно числу, которое введёт пользователь? Или я ошибаюсь?

И где этот ввод? Или программа сама должна догадаться, какую переменную спрашивать у пользователя, а какую нет?

@SnapeEye · 15.09.2014, 18:47 **[ТС]**

Сообщение от quwy

И где этот ввод? Или программа сама должна догадаться, какую переменную спрашивать у пользователя, а какую нет?

Pascal

Program lab6;
Uses Crt;
const
  e=0.0005;
var
  i,n,S:integer;
  z:integer; {какой тип данных тут?}
  memb:integer; {какой тип данных тут?}
Begin
  i:=1;
  S:=1;
  Write('Введите n: ');
  ReadLn;
    while abs (n)>e do
      Begin
        memb:=z/sqr(sqr(i));
        S:=S+memb;
        z:=-z;
        i:=i+1;
      end;
  WriteLn('S= ',S);
  ReadLn;
end.

Прошу прощения, вот дописал ввод, но в программе он у меня был, это невнимательность. Но она всё же не выводит никаких результатов.

quwy · 15.09.2014, 18:52

Сообщение от SnapeEye

Прошу прощения, вот дописал ввод, но в программе он у меня был, это невнимательность

И где в вашем коде ввод значения в n? Думаете, что компилятор такой умный и такой самостоятельный, что догадается считать введенное пользователем значение в переменную n только исходя из того, что перед этим вы вывели на экран строчку "Введите n:"?

Сообщение от SnapeEye

Но она всё же не выводит никаких результатов.

Как она может выводить результаты, если она даже компилироваться не будет?

@Puporev · 15.09.2014, 18:57

Это уже третья тема автора и он никак не поймет что n вводить не нужно, считается сумма ряда с заданной точностью.

Добавлено через 1 минуту
А решение ему было написано еще здесь.
https://www.cyberforum.ru/delp... 55404.html

@SnapeEye · 15.09.2014, 19:26 **[ТС]**

Сообщение от Puporev

Это уже третья тема автора и он никак не поймет что n вводить не нужно, считается сумма ряда с заданной точностью.

Добавлено через 1 минуту
А решение ему было написано еще здесь.
https://www.cyberforum.ru/delp... 55404.html

Почему программа вычисляет только значение первого вводимого числа? Допустим я хочу узнать результат с n=5. Это программа чудесно высчитывает. Но мне было бы ещё интересно узнать результат при n=6 не закрывая программы. Результат не вычисляется =( Интересно, из-за чего это происходит!?

@Puporev · 15.09.2014, 19:32

Тебе сколько раз объяснять, что по условию программа должна вычислять не N членов. а пока не будет достигнута заданная точность.
Вот если бы условие было не точность, а вычислить сумму первых N членов, тогда вводили бы N и считали

Delphi

1
2
3

s:=0;
for i:=1 to n do
s:=s+.....

quwy · 15.09.2014, 19:34

Сообщение от SnapeEye

Но мне было бы ещё интересно узнать результат при n=6 не закрывая программы.

А куда, простите, не закрывая программы, вы вводите новое число?

Я конечно догадываюсь, что наверное, в заключительный пустой ReadLn, но мне интересно, действительно ли все так запущено.

@SnapeEye · 15.09.2014, 19:36 **[ТС]**

Вроде бы понятно. Спасибо, что научили!)

@Puporev Почетный модератор 64276 / 47575 / 32739 Регистрация: 18.05.2008 Сообщений: 115,182
	15.09.2014, 18:57	10
	Это уже третья тема автора и он никак не поймет что n вводить не нужно, считается сумма ряда с заданной точностью. Добавлено через 1 минуту А решение ему было написано еще здесь. https://www.cyberforum.ru/delp... 55404.html 1

@SnapeEye 6 / 6 / 7 Регистрация: 16.05.2013 Сообщений: 351
	15.09.2014, 19:26 [ТС]	11
	Сообщение от Puporev Это уже третья тема автора и он никак не поймет что n вводить не нужно, считается сумма ряда с заданной точностью. Добавлено через 1 минуту А решение ему было написано еще здесь. https://www.cyberforum.ru/delp... 55404.html Почему программа вычисляет только значение первого вводимого числа? Допустим я хочу узнать результат с n=5. Это программа чудесно высчитывает. Но мне было бы ещё интересно узнать результат при n=6 не закрывая программы. Результат не вычисляется =( Интересно, из-за чего это происходит!? 0

quwy Native x86 5176 / 3022 / 875 Регистрация: 13.02.2013 Сообщений: 9,635
	15.09.2014, 17:56	2
	Все должно быть Real. Переменная n не инициализирована. 0

@SnapeEye 6 / 6 / 7 Регистрация: 16.05.2013 Сообщений: 351
	15.09.2014, 18:06 [ТС]	3
	Сообщение от quwy Переменная n не инициализирована. Не понял, это как? 0

@Puporev
	15.09.2014, 18:08 #4
	Не по теме: Каким ты был, таким ты и остался... 0

quwy Native x86 5176 / 3022 / 875 Регистрация: 13.02.2013 Сообщений: 9,635
	15.09.2014, 18:13	5
	Сообщение от SnapeEye Не понял, это как? Чему равна n в начале цикла? 0

@SnapeEye 6 / 6 / 7 Регистрация: 16.05.2013 Сообщений: 351
	15.09.2014, 18:22 [ТС]	6
	Сообщение от quwy Чему равна n в начале цикла? По идее, n должно быть равно числу, которое введёт пользователь? Или я ошибаюсь? 0

quwy Native x86 5176 / 3022 / 875 Регистрация: 13.02.2013 Сообщений: 9,635
	15.09.2014, 18:37	7
	Сообщение от SnapeEye о идее, n должно быть равно числу, которое введёт пользователь? Или я ошибаюсь? И где этот ввод? Или программа сама должна догадаться, какую переменную спрашивать у пользователя, а какую нет? 0

quwy Native x86 5176 / 3022 / 875 Регистрация: 13.02.2013 Сообщений: 9,635
	15.09.2014, 18:52	9
	Сообщение от SnapeEye Прошу прощения, вот дописал ввод, но в программе он у меня был, это невнимательность И где в вашем коде ввод значения в n? Думаете, что компилятор такой умный и такой самостоятельный, что догадается считать введенное пользователем значение в переменную n только исходя из того, что перед этим вы вывели на экран строчку "Введите n:"? Сообщение от SnapeEye Но она всё же не выводит никаких результатов. Как она может выводить результаты, если она даже компилироваться не будет? 0

quwy Native x86 5176 / 3022 / 875 Регистрация: 13.02.2013 Сообщений: 9,635
	15.09.2014, 19:34	13
	Сообщение от SnapeEye Но мне было бы ещё интересно узнать результат при n=6 не закрывая программы. А куда, простите, не закрывая программы, вы вводите новое число? Я конечно догадываюсь, что наверное, в заключительный пустой ReadLn, но мне интересно, действительно ли все так запущено. 0

@SnapeEye 6 / 6 / 7 Регистрация: 16.05.2013 Сообщений: 351
	15.09.2014, 19:36 [ТС]	14
	Вроде бы понятно. Спасибо, что научили!) 0

Опции темы