Проблема с приложением Турбо Паскаля

@Azarduh · Регистрация: 11.01.2011

Студворк — интернет-сервис помощи студентам

Скачал Турбо Паскаль 7.1, составляю программу и запускаю, появляется на секунду черный экран и сразу возвращается в программу. в чем же дело? Программы правильные, рабочие

@Splitter · 14.01.2011, 14:48

программа выводит результат и сразу же прекращает работу, это выглядит как мигнул экран и все пропало, там есть какой-то хитрый оператор, который обычно в конце программы вставить который притормозит ее окончание, к сожалению не помню какой, гугл точно знает или кнопочка, если не ошибаюсь f5, которая покажет результат предыдущего запуска программы.

@MisterIvan · 14.01.2011, 15:05

В конце программы поставьте оператор:

Pascal

ReadLn;

И вот тебе счастье!

@Puporev · 14.01.2011, 15:32

Или

Pascal

uses crt;
var
begin
.....
readkey//любая клавиша
end.

Или без readln,readkey, просто нажать после Ctrl+F9 Alt+F5.

@Dekio · 14.01.2011, 21:58

Как вариант

Pascal

1 2	repeat until KeyPressed; end.

@Puporev · 15.01.2011, 07:26

Сообщение от Dekio

Как вариант
repeat until KeyPressed;
end.

Это самое неудачное из всего что можно придумать....

@Mad_Dog · 15.01.2011, 09:38

Puporev, объясни мне непонятливому, плиз...
KeyPressed - возврвщает True, если была нажата клавиша... Не задерживает выполнение программы!
Readkey - Читает символ с клавиатуры Приостанавливает исполнение программы до нажатия на любую клавишу, кроме клавиш расширения...

@TAVulator · 15.01.2011, 09:40

Сообщение от Mad_Dog

KeyPressed - возврвщает True, если была нажата клавиша... Не задерживает выполнение программы!
Readkey - Читает символ с клавиатуры Приостанавливает исполнение программы до нажатия на любую клавишу, кроме клавиш расширения...

если тебе нужна именно задержка (пауза), то используй delay

@Dekio · 15.01.2011, 09:40

Сообщение от Puporev

Это самое неудачное из всего что можно придумать....

Но придумали же.
Я лишь навел пример, который довольно часто используемый.

@Mad_Dog · 15.01.2011, 09:44

TAVulator, delay - это вообще из другой оперы... Тут либо нажата/не нажата клавиша на "клаве", либо чиитаем код нажатой клавиши...

@Puporev · 15.01.2011, 09:49

Сообщение от Mad_Dog

Puporev, объясни мне непонятливому, плиз...

Не понял что объяснить... Ты и сам все знаешь. Если насчет

Как вариант
repeat until KeyPressed;
end.

то это тоже правомочная структура, но некрасивая, зачем вместо одного слова писать три...

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	15.01.2011, 09:44	10
	TAVulator, delay - это вообще из другой оперы... Тут либо нажата/не нажата клавиша на "клаве", либо чиитаем код нажатой клавиши... 0

@Azarduh 16 / 16 / 6 Регистрация: 11.01.2011 Сообщений: 33
		1
	Проблема с приложением Турбо Паскаля 14.01.2011, 14:43. Показов 845. Ответов 10 Метки нет (Все метки) Скачал Турбо Паскаль 7.1, составляю программу и запускаю, появляется на секунду черный экран и сразу возвращается в программу. в чем же дело? Программы правильные, рабочие 0

@Splitter 203 / 145 / 16 Регистрация: 13.01.2009 Сообщений: 554
	14.01.2011, 14:48	2
	программа выводит результат и сразу же прекращает работу, это выглядит как мигнул экран и все пропало, там есть какой-то хитрый оператор, который обычно в конце программы вставить который притормозит ее окончание, к сожалению не помню какой, гугл точно знает или кнопочка, если не ошибаюсь f5, которая покажет результат предыдущего запуска программы. 0

@Puporev Почетный модератор 64291 / 47589 / 32740 Регистрация: 18.05.2008 Сообщений: 115,181
	15.01.2011, 07:26	6
	Сообщение от Dekio Как вариант repeat until KeyPressed; end. Это самое неудачное из всего что можно придумать.... 0

@Mad_Dog Фрилансер 452 / 433 / 117 Регистрация: 01.06.2010 Сообщений: 1,314
	15.01.2011, 09:38	7
	Puporev, объясни мне непонятливому, плиз... KeyPressed - возврвщает True, если была нажата клавиша... Не задерживает выполнение программы! Readkey - Читает символ с клавиатуры Приостанавливает исполнение программы до нажатия на любую клавишу, кроме клавиш расширения... 0

@TAVulator ⚽ 4188 / 1289 / 237 Регистрация: 27.07.2009 Сообщений: 3,961
	15.01.2011, 09:40	8
	Сообщение от Mad_Dog KeyPressed - возврвщает True, если была нажата клавиша... Не задерживает выполнение программы! Readkey - Читает символ с клавиатуры Приостанавливает исполнение программы до нажатия на любую клавишу, кроме клавиш расширения... если тебе нужна именно задержка (пауза), то используй delay 0

@Dekio Фрилансер 5845 / 1226 / 499 Регистрация: 23.11.2010 Сообщений: 3,375 Записей в блоге: 1
	15.01.2011, 09:40	9
	Сообщение от Puporev Это самое неудачное из всего что можно придумать.... Но придумали же. Я лишь навел пример, который довольно часто используемый. 0

@Puporev Почетный модератор 64291 / 47589 / 32740 Регистрация: 18.05.2008 Сообщений: 115,181
	15.01.2011, 09:49	11
	Сообщение от Mad_Dog Puporev, объясни мне непонятливому, плиз... Не понял что объяснить... Ты и сам все знаешь. Если насчет Как вариант repeat until KeyPressed; end. то это тоже правомочная структура, но некрасивая, зачем вместо одного слова писать три... 0

Опции темы