Program Primer; Var M,result : real; Begin Writeln('Введите значения переменной M'); Write('M='); Readln(M); Result := sqr((5+M)*9); Writeln ('sqr((5+M)*9)', result:8:0); Readln; End. Запусти Паскаль, введи данную программу, получи результат, если M=4
СРОЧНО ПОЖАЛУЙСТА

Результат работы данной программы считается по формуле:

Нас просят посчитать при M=4.

Посчитаем: Result = ((5+4)*9)²=81²=6561

Ответ: 6561