только скажите ответ числом, program primer; var m,result : real; begin writeln('введите значения переменной m'); write('m='); readln(m); result : = sqr((4+m)*5); writeln ('sqr((4+m)*5)', result: 8: 0); readln; end. запусти паскаль, введи данную программу, получи результат, если m=4
M=4
sqr((4+M)*5) 1600