|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
Опции темы | Поиск в этой теме |
28.04.2017, 17:00 | #1 |
Пользователь
Регистрация: 27.09.2016
Сообщений: 66
|
[Pascal] Помогите найти ошибку.
Это программа работает,только результат немного не правильно,вывод должен быть вот так
Для угла в 2 градусов y=-0.139 Для угла в 2.1 градусов y=-0.104 Для угла в 2.2 градусов y=-0.069 Для угла в 2.3 градусов y=-0.034 Для угла в 2.4 градусов y= 0.001 Для угла в 2.5 градусов y= 0.036 Для угла в 2.6 градусов y= 0.071 Для угла в 2.7 градусов y= 0.106 Для угла в 2.8 градусов y= 0.141 Для угла в 2.9 градусов y= 0.176 Для угла в 3 градусов y= 0.211 а выводит только до 2.9 помогите найти ошибку Код программы: Код:
Код программы нужно выделять (форматировать) тегами [CODE] (читать FAQ) Модератор Последний раз редактировалось Serge_Bliznykov; 28.04.2017 в 17:23. |
28.04.2017, 17:21 | #2 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
Вы столкнулись с погрешностью машинного представления вещественных чисел.
попробуйте после x:=x+h; написать Код:
подробнее об этом можно почитать в статьях по ссылкам ТУТ теперь, когда выяснили, кто виноват, решим, что же делать. вариантов много. например, можно округлять x до одного знака после запятой: Код:
Код:
|
28.04.2017, 18:03 | #3 |
Пользователь
Регистрация: 27.09.2016
Сообщений: 66
|
а вот еще одна программа там такая же ситуация.Что посоветуете там сделать?
Код:
|
29.04.2017, 15:27 | #4 |
Старожил
Регистрация: 09.01.2008
Сообщений: 26,229
|
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Найти седловые точки в матрице(помогите найти ошибку) - pascal | tdsotm | Помощь студентам | 0 | 20.11.2014 18:57 |
Помогите найти ошибку в программе на Pascal | Cade | Паскаль, Turbo Pascal, PascalABC.NET | 1 | 04.07.2009 20:07 |
Задача Pascal (Procedure) Помогите найти ошибку! | Seriy8888 | Паскаль, Turbo Pascal, PascalABC.NET | 2 | 14.12.2008 14:53 |