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

Program Primer;

Var A,result : real;

Begin

Writeln('Введите значения переменной A');

Write('A=');

Readln(A);

Result := sqr((4+A)*10);

Writeln ('sqr((4+A)*10)', result:8:0);

Readln;

End.

Что будет выведено в результате, если A=2?