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

> Прочтите прежде чем задавать вопрос!

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

> Не работает программа!
Гость_Lamer
сообщение 8.07.2004 10:25
Сообщение #1


Гость






Создал самую простую программу и сохранил на диске:
Код
Program p1;
{Сложение x,y,z}
var x, y, z, s : integer;
begin
writeln ('напиши номера x,y,z:');
readln (x, y, z);
s:=x+y+z;
writeln ('Результат:');
writeln (s);
end.

Запускаю .exe файл, пишу три номера, нажимаю enter и ... программа закрывается.
Мой вопрос: Почему??? Заранее Спасибо!!!

Сообщение отредактировано: volvo - 22.01.2005 16:37
 К началу страницы 
+ Ответить 
 
 Ответить  Открыть новую тему 
Ответов(1 - 7)
APAL
сообщение 8.07.2004 10:50
Сообщение #2


Смотрю...
*****

Группа: Модераторы
Сообщений: 1 055
Пол: Мужской
Реальное имя: Пшеничный Алексей Анатольевич

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


Ты просто напросто не успеваешь увидеть того, что выдает программа.
Необходимо не дать завершиться программе, скажем, до нажатия ENTER (к примеру).
Для этого перед "end." поставь "Readln;"

Или запускай прогу под NortonCommander'ом (ДОС-версией), после выполнения проги и "вылета" в Нортон нажми Ctrl+O


--------------------
Если что-то не делает того, что вы запланировали ему делать - это еще не означает, что оно бесполезно.
--------------------
Прежде, чем задать вопрос - Правила :: FAQ :: Поиск
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
NetAnton
сообщение 8.07.2004 10:50
Сообщение #3


Пионер
**

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

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


1) ну так она и должна закрываться. выводит результат и закрывается, потому что в конце нет чего-либо похожего на ReadLn, repeat until KeyPressed или ReadKey.

2) ну а если у тебя не стоит проверка диапазона {$R} и ты вводишь числа вне -32768..32767 или сумма превосходит MaxInt, то прога "вылетает".


--------------------
Я люблю этот форум!
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
BlackShadow
сообщение 8.07.2004 13:39
Сообщение #4


Гость






Более простой вариант, не требующий изменения кода - вызвать свойства .exe и снять галочку "Закрывать при завершении программы". Но это придётся делать на каждом компе или тягать с собой .pif.
 К началу страницы 
+ Ответить 
Altair
сообщение 9.07.2004 15:27
Сообщение #5


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

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


У меня как-то была проблемма с точностью наоборот, мне надо было что бы окно проги закрывалось сразу smile.gif

Есть 3 способ увидеть результат - поставить в конце задержку.
delay(2000); хватит smile.gif


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
BlackShadow
сообщение 9.07.2004 15:59
Сообщение #6


Гость






Забыли ещё вариант с перенаправлением вывода. Что-то типа "MyProg.Exe > 1.Txt". Но тогда подсказки выводимые в ходе работы программы скидываются туда же.
 К началу страницы 
+ Ответить 
Altair
сообщение 9.07.2004 16:12
Сообщение #7


Ищущий истину
******

Группа: Модераторы
Сообщений: 4 824
Пол: Мужской
Реальное имя: Олег

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


Короче говоря методы следующие:
1. ждать собятия (мышь, нажатие клавиши и т.п.)
2. ждать по времени
3. перенаправить вывод в файл


--------------------
Помогая друг другу, мы справимся с любыми трудностями!
"Не опускать крылья!" (С)
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 
Werwolf86
сообщение 10.07.2004 12:49
Сообщение #8


Новичок
*

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

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


Прощё говоря..зацикли экран с выходом - нажатие любая клавиша и все... :D
 Оффлайн  Профиль  PM 
 К началу страницы 
+ Ответить 

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

 



- Текстовая версия 20.07.2025 13:01
Хостинг предоставлен компанией "Веб Сервис Центр" при поддержке компании "ДокЛаб"