Cho đoạn chương trình sau, giá trị của a là?

cho doan chuong trinh sau
Var a:integer;
Begin a:=16
if a>=10 then a:=sqrt(sqrt(a))+1
           else
              a:=5
giá trị a là