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