Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình: i:=1; While i <5 do  Begin

Trong ngôn ngữ lập trình Pascal, cho đoạn chương trình:

i:=1;

While i <5 do

   Begin

if I mod 3 = 1 then Write(‘TIN HOC’);

i:=i+1;

 End;

Chữ TIN HOC được in ra màn hình mấy lần