Question

Дана программа:

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.

Answer 1

Если запустить Паскаль и ввести данную программу, то нам будет выведена строка:

sqr((4+N)*4)    1024