|
|
Регистрация Восстановить пароль |
Повторная активизация e-mail |
Регистрация | Задать вопрос |
Заплачу за решение |
Новые сообщения |
Сообщения за день |
Расширенный поиск |
Правила |
Всё прочитано |
|
|
Опции темы | Поиск в этой теме |
26.03.2009, 07:43 | #11 |
Oldschool geek
Форумчанин
Регистрация: 09.03.2009
Сообщений: 611
|
Видимо, в особенностях работы плавающей точки.
n:=(exp(n*ln(2))); — это ненадёжный способ вычисления степени, когда нужно целое число. Хоть бы Round его, что ли. UPD: Степень двойки можно вычислять как 1 shl power Последний раз редактировалось OCTAGRAM; 26.03.2009 в 07:46. |
26.03.2009, 08:07 | #12 | ||
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
Цитата:
Че так?
I'm learning to live...
|
||
26.03.2009, 08:13 | #13 |
Oldschool geek
Форумчанин
Регистрация: 09.03.2009
Сообщений: 611
|
Нет, это глюк программиста. Я как программист, недоволен этим кодом. И будь я преподом, я бы докопался, и тот факт, что в NTVDM всё работает, не спас бы.
Четвёрка на разных CPU&RTL округляется чуть влево или чуть вправо. В данном случае это как раз хорошо видно. Если посмотреть, как составлена программа, то мелкая особенность CPU становится определяющей. Нельзя так программы писать. Плавающая точка — она и есть плавающая. Последний раз редактировалось OCTAGRAM; 26.03.2009 в 08:18. |
26.03.2009, 08:28 | #14 | |
Белик Виталий :)
Старожил
Регистрация: 23.07.2007
Сообщений: 57,097
|
Цитата:
Хотя конечно Борландовцы перестраховавшись всетки доработали это выражение в функции Power в Делфи. P.S. Кста автор может попробовать включить эмуляцию 8087 на совем паскале.
I'm learning to live...
|
|
26.03.2009, 08:45 | #15 |
Oldschool geek
Форумчанин
Регистрация: 09.03.2009
Сообщений: 611
|
Неа. Не нормальный.
Код:
При желании можно найти обратный вариант, где в School Pak будет работать, а в NTVDM — нет. Вот, например, чтобы далеко не ходить, вычислим–ка (8 - 2^n)! при n=2: Код:
У меня NTVDM ни на одной машине под рукой нет, так что не смогу проверить. Но что–то мне подсказывает, в NTVDM с хорошей вероятностью будет 120. Кстати, можно ещё потестить изначальный пример на разных n. По–любому где–нибудь отклонится в другую сторону. |
26.03.2021, 18:40 | #16 |
Новичок
Джуниор
Регистрация: 26.03.2021
Сообщений: 3
|
Здравствуйте. Ребенок начал изучать программирование в школе. На Виндоус 10 смогли установить только school pak. Сам Паскаль работает, но при запуске программы на выполнение, результат на экран не выводится. Все команды в меню Компиляция перепробовали и Сброс главного экрана делали. Бестолку. Результат на экран не выводится.
Но ведь так не должно быть! Как настроить school pak чтобы больше эта проблема не повторялась? Помогите очень нужно. |
26.03.2021, 18:50 | #17 |
МегаМодератор
СуперМодератор
Регистрация: 09.11.2010
Сообщений: 7,291
|
Покажите код программы. У вас точно открыто окно "Вывод" (Отладка - Вывод)?
Пишите язык программирования - это форум программистов, а не экстрасенсов. (<= это подпись )
|
26.03.2021, 20:24 | #18 |
2 the Nation Glory
Старожил
Регистрация: 27.05.2014
Сообщений: 3,289
|
вангую что выводится, но только окно закрывается.
Readln; перед End. надобно
Кто умер, но не забыт, тот бессмертен.
Лао-Цзы. |
26.03.2021, 23:39 | #19 | |
Старожил
Регистрация: 23.10.2010
Сообщений: 2,309
|
Цитата:
В списке литературы есть ссылки на книгу "Песни о Паскале". Если внимательно почитаете, и отбросите версию Pascal ABC (очень много нареканий на форумах), то сможете поставить и Free Pascal или Lazarus. Это бесплатные среды и нормально работают в среде Windows 10. Pascal - это требование преподавателя? В ЕГЭ есть и Python. В дополнение могу порекомендовать книгу Т.А. Павловская, Программирование на ЯВУ, Паскаль. Искать там-же. PS: Не вижу смысла изучать среду, которой нет в ВУЗе. Или я чего-то недопонимаю ...
Как-то так, ...
|
|
08.05.2022, 20:36 | #20 |
Новичок
Джуниор
Регистрация: 26.03.2021
Сообщений: 3
|
Спасибо всем. Разобрались.
В школе изучают в 7-9 классах Pascal. Учитель ввел учеников и меня в заблуждение. Установили Pascal ABC.NET. Он работает и на 10-ке и на 7-ке нормально. У нас в городе школы не ахти какие. Нормально уроки не преподают, до Питона детям как до Китая пешком! Элементарным вещам детей на уроках информатики не учат. Дети на полном самообучении! А если учесть нагрузку детей, то у них совершенно нет времени на поиски информации в Интернете. Приходится помогать детям, как могу. Обучаю детей азам работы на компьютере, тому чего их по идее в школе должны научить. Обучаю азам программирования (из того, что сама еще помню и умею). В любом случае всем спасибо. Простите что не ответила сразу. |
|
Похожие темы | ||||
Тема | Автор | Раздел | Ответов | Последнее сообщение |
Ини файл ошибка(глюк или что?) | dr.Chas | Общие вопросы Delphi | 10 | 18.06.2008 08:09 |
Класс или тип (сам не знаю) | WOLFak | Общие вопросы Delphi | 6 | 27.03.2008 00:20 |
Глюк )) | theos | О форуме и сайтах клуба | 9 | 08.01.2008 17:44 |
Глюк? Или я туплю? | Nick93.93 | Общие вопросы Delphi | 6 | 04.03.2007 14:28 |