 проверка типа переменной |
Прочтите прежде чем задавать вопрос!
1. Заголовок темы должен быть информативным. В противном случае тема удаляется ...
2. Все тексты программ должны помещаться в теги [code=pas] ... [/code].
3. Прежде чем задавать вопрос, см. "FAQ", если там не нашли ответа, воспользуйтесь ПОИСКОМ, возможно такую задачу уже решали!
4. Не предлагайте свои решения на других языках, кроме Паскаля (исключение - только с согласия модератора).
5. НЕ используйте форум для личного общения, все что не относится к обсуждению темы - на PM!
6. Одна тема - один вопрос (задача)
7. Проверяйте программы перед тем, как разместить их на форуме!!!
8. Спрашивайте и отвечайте четко и по существу!!!
  |
| Altair |
 14.09.2004 20:06
Сообщение
#41
|
 Ищущий истину  Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация:  45   |
ну давай, покажи.
-------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
   |
 
|
| GoodWind |
14.09.2004 21:52
Сообщение
#42
|
 Автооответчик Группа: Модераторы Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16 |
Цитата ну давай, покажи. Присоединяюсь - оч хочется научиться ! --- Знание - сила  -------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
|
|
|
| BRS |
15.09.2004 14:30
Сообщение
#43
|
 Новичок Группа: Пользователи Сообщений: 45 Пол: Мужской Репутация: 0 |
гы ) рульная кошка )
|
|
|
|
| BlackShadow |
15.09.2004 20:46
Сообщение
#44
|
|
Гость |
BRS, не в тему, но кошка действительно рулез :D :D :D
Под DOS или под Windows (тогда 9x или NT)? |
|
|
|
| Altair |
15.09.2004 21:52
Сообщение
#45
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Цитата кошка действительно рулез Гыыыыы.... :D ПОД DOS! -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| GoodWind |
16.09.2004 22:01
Сообщение
#46
|
|
Автооответчик Группа: Модераторы Сообщений: 1 188 Пол: Мужской Реальное имя: Александр Репутация: 16 |
Под DOS
-------------------- Неадекватная чушь может быть адекватным ответом на неадекватный вопрос. Понятно или разжевать?
|
|
|
|
| BlackShadow |
17.09.2004 21:09
Сообщение
#47
|
|
Гость |
Не, ну народ, это не серьёзно. Под DOS, как два байта переслать. А точнее 4. А переслать их надо на адрес 00064h, если калькулятор не подвёл. Т. е. меняешь INT19h на свой обработчик, который не вызывает перекрытый и дело с концом...
|
|
|
|
| Altair |
17.09.2004 21:22
Сообщение
#48
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
ты код дай... тогда поговорим ... Учти ТОЛЬКО блокировка CTRL+ALT+DEL!!!
-------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| BlackShadow |
20.09.2004 20:05
Сообщение
#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 |
21.09.2004 7:03
Сообщение
#50
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Отлично, Черная тень!
Но я знаю как лучше сделать!  -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
| Romtek |
21.09.2004 18:18
Сообщение
#51
|
 Знаток Группа: Пользователи Сообщений: 303 Пол: Мужской Реальное имя: Роман Репутация: 2 |
Код var a: integer; begin repeat write ('Введите целое число: '); readln (a); until IOresult = 0; Что-то флейм пошёл жестокий... -------------------- Romiras HomeLab- материалы и статьи по разработке ПО, моделирование алгоритмов, обработка и анализ информации, нейронные сети, машинное зрение и прочее.
|
|
|
|
| Altair |
21.09.2004 18:25
Сообщение
#52
|
|
Ищущий истину Группа: Модераторы Сообщений: 4 824 Пол: Мужской Реальное имя: Олег Репутация: 45 |
Да уж, бред!!
Я просто не смотрел. Закрываю тему, ибо это жестокий флейм в сторону модера или подстава! Ё - редко, кто знает где это буква на клаве... -------------------- Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С) |
|
|
|
|
1 чел. читают эту тему (гостей: 1, скрытых пользователей: 0)
Пользователей: 0
|
Текстовая версия | 15.11.2025 13:54 |