игра "Кости", первый опыт, помогите пожалуйста Опции

[Creas]

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

 
var
y,r,r1:integer;
begin
r:=Random(6)+1;
r1:=Random(6)+1;
y:=r+r1;
writeln('очки выпавшие на кубиках',r,' и ',r1);
writeln('сумма равна ',y);
end.
 

заранее благодарен

[Creas]

Спасибо вроде понял, но как сделать так что бы приложение сразу не закрывалось после получения результата