Текст программы:
Program Input_0utput;
var
n1,n2 : Integer;
х : Real;
BEGIN
Write( "n1 = ");
ReadLn (n1);
Write ( "n2 = ");
ReadLn (n2);
x := n1/n2;
WriteLn("n1/n2 =",х);
END.
Что за строку нужно вставить, чтобы программа не закрывалась, а ответ выводился на экран?
Ссылка на пост
8 сен 2008 в 03:42