CHO CHƯƠNG TRÌNH SAU

Câu 22. Cho chương trình sau :Program Thidu ;Var s : string[50] ;Procedure foo(s : string);Var i : integer;Begin i := 1 ;while ( i <= length(S) ) dobeginwriteln( s[ i ] ) ;i := i + 1 ;end ;end;Begins := ‘tinhoc’ ;foo(s) ;End .Số dòng chương trình in ra màn hình là bao nhiêu ?A. 50 dòng; B. 6 dòng; C. 7 dòng; D.Vô số dòng;