Question

[Lan Võ]

Cho biết giá trị của d sau khi thực hiện đoạn chương trình sau: S:='Hoang Thi Thu Hong' ; d:=0; For i:=1 to length(S) do Begin S[i]:= Upcase(s[i]); If s[i]= 'H' then d:= d+1; End;

Answer 1

[Minh Lệ]

Dịch chương trình: Đây là đoạn chương trình in hoa tất cả các kí tự trong xâu và đếm số lượng chữ cái H trong xâu.

S = 'Hoang Thi Thu Hong' sau khi in hoa S = 'HOANG THI THU HONG'

-> Trong xâu S có 4 kí tự 'H' => d = 4