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

Program Primer;

Var

A,result : real;

Begin

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

Write('A=');

Readln(A);

Result := sqr((7+A)*8);

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

Readln;

End.

Запусти Паскаль, введи данную программу, получи результат, если A=3.

(В окошко для ответа запиши только числовое значение!)

ответ: