Xem chương trình và viết kết quả in ra màn hình

Giả sử có chương trình như sau:
Var a, b, m: real;
Begin
a := 5; b := 4;
m := sqrt(a+b);
writeln(‘m=’ , m:3:1);
Readln
End.
Kết quả in ra màn hình là?