Задание

Выполни задание

Найди в программе и выпиши из неё заголовок головной программы; раздел описания переменных; раздел описания подпрограммы с указанием имени функции, входных данных, типа результата и операторов функции; раздел операторов головной программы.

program \(n92\) ;

var \(x, y: integer\) ;

\(p: longint\) ;

function \(f (n: integer)\) :

\(longint\) ;

var \(i: integer; p: longint\) ;

begin

\(p\) : \(=1\) ;

for \(i\) : \(=1\) to \(n\) do \(p\) : \(=p\*i\) ;

\(f\) : \(=p\)

end;

begin

\(write\,('x=')\) ; \(readln\,(x)\) ;

\(write\,('y=')\) ; \(readln\,(y)\) ;

\(p\) : \(= f(x)+f(y)+f(x+y)\) ;

\(writeln\,('p=', p)\)

end.

Что будет выведено на экран в результате выполнения этой программы?

Проверь себя, выполнив программу в среде программирования Паскаль.