 проверка типа переменной |
Правила форума :: Скачать Pascal :: FAQ // Ада–2020 :: Скачать GNAT :: OEM–2015 :: Ada -> C/C++
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code], либо быть опубликованы на нашем PasteBin в режиме вечного хранения.
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| Altair |
Сообщение
#41
|
 Ищущий истину  Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация:  45   |
ну давай, покажи.
-------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
   |
 
|
| GoodWind |
Сообщение
#42
|
 Автооответчик Группа: Пользователи Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16 |
Цитата ну давай, покажи. Присоединяюсь - оч хочется научиться ! --- Знание - сила  -------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
|
|
|
| BRS |
Сообщение
#43
|
 Новичок Группа: Пользователи Сообщений: 45 Пол: Мужской Репутация: 0 |
гы ) рульная кошка )
|
|
|
|
| BlackShadow |
Сообщение
#44
|
|
Гость |
BRS, не в тему, но кошка действительно рулез :D :D :D
Под DOS или под Windows (тогда 9x или NT)? |
|
|
|
| Altair |
Сообщение
#45
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата кошка действительно рулез Гыыыыы.... :D ПОД DOS! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| GoodWind |
Сообщение
#46
|
|
Автооответчик Группа: Пользователи Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16 |
Под DOS
-------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
|
|
|
| BlackShadow |
Сообщение
#47
|
|
Гость |
Не, ну народ, это не серьёзно. Под DOS, как два байта переслать. А точнее 4. А переслать их надо на адрес 00064h, если калькулятор не подвёл. Т. е. меняешь INT19h на свой обработчик, который не вызывает перекрытый и дело с концом...
|
|
|
|
| Altair |
Сообщение
#48
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
ты код дай... тогда поговорим ... Учти ТОЛЬКО блокировка CTRL+ALT+DEL!!!
-------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| BlackShadow |
Сообщение
#49
|
|
Гость |
Олег, ты и мёртвого достанешь. Код примерно такой (как всегда без компилятора):
Код Program Zavison; Uses DOS; Procedure NewInt19h;Interrupt; Begin End; Begin SetIntVec($19,@NewInt19h); While True Do End. Теперь твоя душенька довольна? Если хочешь, вот тебе более эффектный вариант: Код Program RealZavison; Begin Asm CLI HLT End End. |
|
|
|
| Altair |
Сообщение
#50
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Отлично, Черная тень!
Но я знаю как лучше сделать!  -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Romtek |
Сообщение
#51
|
 Знаток Группа: Пользователи Сообщений: 303 Пол: Мужской Реальное имя: Роман Репутация: 2 |
Код var a: integer; begin repeat write ('Введите целое число: '); readln (a); until IOresult = 0; Что-то флейм пошёл жестокий... -------------------- Romiras HomeLab- материалы и статьи по разработке ПО, моделирование алгоритмов, обработка и анализ информации, нейронные сети, машинное зрение и прочее.
|
|
|
|
| Altair |
Сообщение
#52
|
|
Ищущий истину Группа: Пользователи Сообщений: 4 825 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Да уж, бред!!
Я просто не смотрел. Закрываю тему, ибо это жестокий флейм в сторону модера или подстава! Ё - редко, кто знает где это буква на клаве... -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 9.09.2025 15:58 |
Связь с администрацией: bu_gen в домене octagram.name