Дана программа:
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.
ответ: