Не работает программа! Опции

[Гость_Lamer]

Создал самую простую программу и сохранил на диске:

Код

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 20:37

[NetAnton]

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

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