. CHO S LAỨ MOỌT BIEỎN XAÕU COỰ GIAỰ TRŨ. ẸEỒ ỦEỎM CAỰC CHỬỪ SOỰÕ C...

37) - DE KIEM TRA TIN 11
Tin học DE KIEM TRA TIN 11
37). Cho S laứ moọt bieỏn xaõu coự giaự trũ. ẹeồ ủeỏm caực chửừ soựõ coự trong xaõu S ta vieỏt laứ :a). D:=0;For i:=1 to length(S) do d:=d+1;b). D:=0;For i:=1 to length(S) do (if S[i]>=0) and (S[i]<=9) then d:=d+1;c). D:=0; For i:=1 to length(S) do (if S[i]>='0') and (S[i]<='9') then d:=d+1;d). Dem:=0;For i:=1 to length(S) do (if S[i]>='0') or (S[i]<='9') then d:=d+1;