Cho đoạn chương trình sau: n:=1; While n<10 do Begin n:=n+1; Writeln(‘ xin chao’); end;