Question

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

Program Primer;
Var
M,result : real;
Begin
Writeln('Введите значения переменной M');
Write('M=');
Readln(M);
Result := sqr((5+M)*4);
Writeln ('sqr((5+M)*4)', result:8:0);
Readln;
End.

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

Answer 1

Ответ:

576

Объяснение:

Запусти программу (F9), введи 1, нажми Enter

$Result=((5+1)*4)^{2}=576$

Ответ выводится по "маске" 8 целых знаков (без запятой)