- Tải app VietJack. Xem lời giải nhanh hơn!
Bài 10 [trang 80 sgk Tin học lớp 11]: Viết chương trình nhập từ bàn phím xâu kí tự S có độ dài không quá 100. Hãy cho biết có bao nhiêu chữ số xuất hiện trong xâu S. Thông báo kết quả ra màn hình.
Trả lời:
Quảng cáo
Ta chỉ cần duyệt lần lượt từng kí tự của xâu S nếu nó nằm trong đoạn từ '0' đến '9' thì ta tăng biến đếm lên 1.
program Diag; uses crt; Var s:string[100]; i,d:integer; begin clrscr; d:=0; write['Nhap xau S :']; readln[s]; for i:=1 to length[s] do if ['0'