IPB
ЛогинПароль:

> Правила раздела!

1. Заголовок или название темы должно быть информативным !
2. Все тексты фрагментов программ должны помещаться в теги [code] ... [/code] или [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ" и используйте ПОИСК !
4. НЕ используйте форум для личного общения!
5. Самое главное - это раздел теоретический, т.е. никаких задач и программ (за исключением небольших фрагментов) - для этого есть отдельный раздел!

 
 Ответить  Открыть новую тему 
> Скорость вывода с CRT и без, результаты тестирования [разделено]
сообщение
Сообщение #1


Я.
****

Группа: Пользователи
Сообщений: 809
Пол: Мужской
Реальное имя: Саша

Репутация: -  11  +


Объясните, пожалуйста, полученный
результат: (Показать/Скрыть)
Прикрепленный файл  Result.txt ( 296 байт ) Кол-во скачиваний: 683
И
почему? (Показать/Скрыть)


Сообщение отредактировано: Lapp -
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #2


Гуру
*****

Группа: Пользователи
Сообщений: 1 013
Пол: Мужской
Ада: Разработчик
Embarcadero Delphi: Сторонник
Free Pascal: Разработчик

Репутация: -  627  +


Что именно тебя удивляет в результате? Извини, я не понял, что ты хотел сказать этим "тестом". Ты уж уточняй, что именно "тестировалось", на всякий случай...

Цитата
//при Сrt и выводе на экран при такой
//записи на экран выводятся пробелы,
//а при такой write(output,'*'); все нормально
А ты ассоциируй файл с консолью правильно - все будет нормально. Кто разрешил делать f := output ?
AssignCRT(f); rewrite(f);
надо...
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #3


Я.
****

Группа: Пользователи
Сообщений: 809
Пол: Мужской
Реальное имя: Саша

Репутация: -  11  +


Да, действительно, о чем это я? smile.gif
Тестировал время работы функции write при подключенном CRT и при отключенном. Вывод в файл и на экран.
Почему разница между двумя первыми тестами в много раз больше разницы между 2мя другими - это более менее понятно: коэффициентом умноженным на разницу является время отрисовки символов.
Но в чем же разница между реализациями этой функции в модулях CRT и system, если не ошибаюсь?

Просто тов. Препод говорил, что CRT работает на много быстрее, а вот случайно наткнувшись на эту тему [ Матрица. Суммы диоганалей паралельных главной и побочной - Lapp] и на ваши высказывания по этому поводу решил усомниться в Его Величества правоте.
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #4


Гуру
*****

Группа: Пользователи
Сообщений: 1 013
Пол: Мужской
Ада: Разработчик
Embarcadero Delphi: Сторонник
Free Pascal: Разработчик

Репутация: -  627  +


Цитата
Просто тов. Препод говорил, что CRT работает на много быстрее
Тов. препод наверняка имел в виду другой компилятор, да? smile.gif Кстати. Хочешь удивиться еще больше? запусти этот же тест под TP (ну, правда его понадобится чуть-чуть переделать, ибо он не будет компилироваться в таком виде. Заодно и тебе будет наука: не все, что пропускает FPC во-первых, правильно, а во-вторых вообще корректно с точки зрения синтаксиса, принятого в Турбо-Паскале).
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
сообщение
Сообщение #5


Гость






Чтобы было быстрее, надо выводить в файл через BlockWrite, а на экран через $B800:$0000. Так что напиши программу вот через это вот, а потом преподу так и скажи, что ты это сделал для того, чтобы ускорить вывод строчки на экран.
 К началу страницы 
+ Ответить 

 Ответить  Открыть новую тему 
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0

 





- Текстовая версия 29.03.2024 14:06
500Gb HDD, 6Gb RAM, 2 Cores, 7 EUR в месяц — такие хостинги правда бывают
Связь с администрацией: bu_gen в домене octagram.name