Подскажите пожалуйста запускаю программу Ctrl+F9, а ничего не происходит. Alt+F9 ошибок не выдает!

[Dialon]

Подскажите пожалуйста запускаю программу Ctrl+F9, а ничего не происходит. Alt+F9 ошибок не выдает!
Program Funcia;
const x=-2.4;
var y: Real;
Begin
y:=(exp(3-x)+exp(x-3))/2+exp((1/4)*ln(abs(x*x*x*x*x-5)/(pi+x)));
writeln (y);
End.

[Sazary]

Добавьте перед end'ом "readln;". Просто программа не делает задержки перед выходом.

[UnChanter]

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

Добавьте перед end'ом "readln;". Просто программа не делает задержки перед выходом.

exe-шник выдаёт runtime error 105 at 0040514E

[Sazary]

Program Funcia;
const x=-2.4;
var y: Real;
Begin
y:=(exp(3-x)+exp(x-3))/2+exp((1/4)*ln(abs(x*x*x*x*x-5)/(pi+x)));
writeln (y);
readln;
End.

Все работает.

[Dialon]

спасибо все работает

[UnChanter]

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

Все работает.

ДА! всё работает... ,просто я через блокнот набирал, и не написал {$APPTYPE CONSOLE}
...