Дана программа: Program Primer; Var N,result : real; Begin Writeln('Введите значения переменной N'); Write('N='); Readln(N); Result := sqr((7+N)*7); Writeln ('sqr((7+N)*7)', result:8:0); Readln; End. Запусти Паскаль, введи данную программу, получи результат, если N=5.