0 / 0 / 1
Регистрация: 07.10.2012
Сообщений: 53
1

найти ошибку(переполнение.)

24.12.2012, 15:09. Показов 854. Ответов 5
Метки нет (Все метки)

Author24 — интернет-сервис помощи студентам
Задание во вложении. На 11 строке выдает переполнение.
Или ,если не сможите увидеть ошибку,предложите свой вариант программы)
http://cs402321.userapi.com/v4... QJaXuE.jpg
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
29
Program fuuuuu;
Const e=0.001;
Var a,s,f,x:real;
    k:integer;
Function F1(n:real;m:byte):real;
Var i:integer;
    p:real;
Begin
    p:=1;
    For i:=1 to m do
     p:=p*n;
    F1:=p;
End;
Begin
    Repeat 
     write('введите x(0<x<1): ');readln(x);
    Until (0<x)and(x<1);
    k:=0;a:=1;s:=a;f:=1;
    While a>=e do
    Begin
      inc(k);
      f:=f*k;
      if k<3 then a:=F1(2*x,k)/f 
       else a:=F1(k*x,k)/f; 
      s:=s+a;
    End;
    writeln('S = ',s:0:6,'  проверочная функция =  ',exp(2*x));
    writeln('проссумируемых членов ряда: ',k)
End.
0
24.12.2012, 15:09
Programming
Эксперт
39485 / 9562 / 3019
Регистрация: 12.04.2006
Сообщений: 41,671
Блог
24.12.2012, 15:09
Ответы с готовыми решениями:

Сортировка методом Хоара, исправить ошибку (переполнение стека, бесконечный цикл)
Сортировка методом Хоара. Нужно первую четверть рассортировать по убыванию, а всё остальное - по возрастанию. Сделал две процедуры...

Найти ошибку. Переполнение в результате выполнения арифметической операции
Нужно было построить график функции, но при нажатии на кнопку возникает ошибка private void Form1_Load(object sender, EventArgs...

Выводит ошибку переполнение
Если в строке находится выражение t+x^2+1, то выдает ошибку EOleException with message 'Переполнение'. function...

5
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
24.12.2012, 15:25 2
Pascal
1
2
3
4
5
6
7
8
9
10
11
12
13
14
15
16
17
18
19
20
21
22
23
24
25
26
27
28
Const e=0.00001; //прочитал как 10^-6, плохо видно
Var a,s,f,x:real;
    k,kmax:integer;
Begin
Repeat
write('введите x(0<x<1): ');
readln(x);
Until (0<x)and(x<1);
kmax:=100;
k:=0;
a:=1;
s:=a;
f:=1;
While a>=e do
 Begin
  inc(k);
  if k>kmax then //в данном случае глупо, но по условию нужно
   begin
    write('Знчение суммы не вычисляется за ',kmax,' итераций');
    readln;
    exit
   end;
  a:=a*2*x/k;
  s:=s+a;
 End;
writeln('S = ',s:0:6,'  проверочная функция =  ',exp(2*x):0:6);
writeln('проссумируемых членов ряда: ',k)
End.
1
0 / 0 / 1
Регистрация: 07.10.2012
Сообщений: 53
24.12.2012, 21:13  [ТС] 3
насколько я понял,ваша программа без факториалов(снизу там делиться на 1!,2!,3! ..и т.д).
Так же экспонента просто умножаеться на 2х,а не возводиться в степень .

Или я ошибаюсь?
0
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
25.12.2012, 08:13 4
Нет, не ошибаетесь, используется рекуррентное отношение A[n]=A[n-1]*2*x/n
1
0 / 0 / 1
Регистрация: 07.10.2012
Сообщений: 53
25.12.2012, 08:34  [ТС] 5
Puporev, еще раз спасибо! вас можно рублем отблагодарить?
0
Почетный модератор
 Аватар для Puporev
64305 / 47602 / 32742
Регистрация: 18.05.2008
Сообщений: 115,181
25.12.2012, 08:35 6
Вне раздела Фриланс не положено это.
0
25.12.2012, 08:35
Надоела реклама? Зарегистрируйтесь и она исчезнет полностью.
inter-admin
Эксперт
29715 / 6470 / 2152
Регистрация: 06.03.2009
Сообщений: 28,500
Блог
25.12.2012, 08:35
Помогаю со студенческими работами здесь

Почему показывает ошибку переполнение числа с плавающей запятой?
Задание в прикрепленном файле #include &lt;vcl.h&gt; #include &lt;iostream.h&gt; #include &lt;stdlib.h&gt; #include &lt;math.h&gt; #pragma hdrstop ...

Найти сумму чисел массива, приняв во внимание переполнение
Ребята, подскажите! По адресу 8100 есть массив 20 однобайтовых чисел. найти сумму элементов массива взяв во внимание переполнение,...

Найти количество положительных элементов массива. Арифметическое переполнение?!
Доброго времени суток! Суть задачи:Найти количество положительных элементов массива. Переписала код с форума,но он пишет что...

Найти причины и способы исправления ошибок в коде (переполнение буфера)
Только начали изучать построение классов.Делаю класс MyCat (кот). Компилирование запускается но потом вылазит ошибка о переполнении буфера....

Двумерный массив. Поиск нулей.Не могу найти ошибку ошибку в коде
Вот,например массив 5 5 0 1 0 1 0 1 1 1 1 1 0 0 0 0 1 0 0 1 0 0 1 0 0 0 0 считываются два числа m и n и далее в выходной...


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

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

Редактор формул (кликните на картинку в правом углу, чтобы закрыть)
Опции темы

Новые блоги и статьи
Использование кэша Laravel - полный гайд
bytestream 18.02.2025
Кэширование - один из наиболее эффективных способов повышения производительности веб-приложений. В современном мире, где скорость загрузки страниц напрямую влияет на удержание пользователей и. . .
Создаем REST API в Laravel с аутентификацией и Passport
bytestream 18.02.2025
Разработка современных веб-приложений все чаще требует создания надежного и хорошо структурированного API. REST API стал стандартом де-факто для построения взаимодействия между клиентской и серверной. . .
Пайплайны в Laravel - полный гайд
bytestream 18.02.2025
Разработка современных веб-приложений часто требует обработки сложных процессов, состоящих из множества последовательных шагов. Например, при создании системы комментариев может потребоваться. . .
Как правильно использовать @required в Symfony
bytestream 18.02.2025
При разработке приложений на Symfony мы часто сталкиваемся с необходимостью внедрения зависимостей. Фреймворк предоставляет несколько способов управления этим процессом, и одним из таких инструментов. . .
Система безопасности в Laravel: возможности и примеры
Wired 18.02.2025
Каждый день появляются новые виды атак и уязвимостей, которые могут поставить под угрозу конфиденциальные данные пользователей и функционирование всей системы. В этом контексте выбор надежного. . .
Давайте сравним Django и Laravel
Wired 18.02.2025
Django и Laravel - два мощных инструмента, которые часто сравнивают между собой. Оба фреймворка предлагают разработчикам богатый набор возможностей для создания масштабируемых веб-приложений, но. . .
Laravel или React - что лучше?
Wired 18.02.2025
В разработке веб выбор правильного инструмента часто определяет успех всего проекта. Особенно интересным представляется сравнение Laravel и React - двух популярных технологий, которые часто. . .
Laravel 11: новые возможности, гайд по обновлению
Wired 18.02.2025
Laravel 11 - это новая масштабная версия одного из самых популярных PHP-фреймворков, выпущенная в марте 2024 года. Эта версия продолжает традицию внедрения передовых технологий и методологий. . .
Миграции в Laravel
Wired 18.02.2025
Разработка веб-приложений на Laravel неразрывно связана с управлением структурой базы данных. При работе над проектом часто возникает необходимость вносить изменения в схему базы данных - добавлять. . .
Аутентификация в Laravel
Wired 18.02.2025
В современном мире веб-разработки безопасность пользовательских данных становится критически важным аспектом любого приложения. Laravel, как один из самых популярных PHP-фреймворков, предоставляет. . .
КиберФорум - форум программистов, компьютерный форум, программирование
Powered by vBulletin
Copyright ©2000 - 2025, CyberForum.ru