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