Cho chương trình sau: var n:byte; function snt(n:byte):boolean; var kt:boolean; i:byte; begin kt:=true; if n = 1 then kt:=false else if n<4 then kt:=true else for i:=2 to trunc(sqrt(n)) do if n mod i= 0 then begin kt:=false; break; end; snt:=kt; end; begin readln(n); if snt(n) then write(n', la so nguyen to !') else write(n,' khong la so nguyen to!'); readln end. Yêu cầu: a. em hãy cho biết đoạn chương trình sau đây thực hiện nhiệm vụ gì? b. em hãy chỉ ra trong chương trình trên đâu là tham số hình thức? đâu là tham số thực sự? đâu là biến toàn cục? đâu là biến cục bộ?