Câu 10 trang 80 SGK Tin học 11
Viết chương trình nhập vào 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ố thập phân xuất hiện trong xâu s. Thông báo kết quả ra màn hình.
Đề bài
Viết chương trình nhập vào 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ố thập phân xuất hiện trong xâu s. Thông báo kết quả ra màn hình.
Lời giải chi tiết
Chương trình nhập vào từ bàn phím xâu kí tự s có độ dài không quá 100. Cho biết số chữ số thập phân xuất hiện trong xâu s. Thông báo kết quả ra màn hình.
Chương trình:
program bai_10_chuong_4;
uses crt;
var
s: string[100];
i, dem: integer;
Begin
clrscr;
write('Nhap xau vao:'); readln(s); dem:= 0;
for i:= 1 to length(s) do
if ('0'<=s[i]) and(s[i]<=’9') then dem:=dem+l;
Writeln('Trong xau s co '»dem,' chu so thap phan');
readln;
End.
Khi chạy chương trình, giả sử nhập vào xâu s :'Tin hoc 11 co 6 chuong' thì kết quả chương trình in ra màn hình: 'Trong xau s co 3 chu so thap phan'.
Kết quả chương trình có dạng như hình 70 dưới đây:
Loigiaihay.com
Bình luận
Chia sẻ
- Câu 11 trang 80 SGK Tin học 11
- Câu 9 trang 80 SGK Tin học 11
- Bài 8 trang 79 SGK Tin học 11
- Câu 7 trang 79 SGK Tin học 11
- Bài 6 trang 79 SGK Tin học 11
>> Xem thêm
Tham Gia Group Dành Cho 2K8 Chia Sẻ, Trao Đổi Tài Liệu Miễn Phí
