Trang chủ
Lớp 11
Tin học Lớp 11 SGK Cũ
Chương IV: Kiểu Dữ Liệu Có Cấu Trúc
Bài tập 10 trang 80 SGK Tin học 11
Bài tập 10 trang 80 SGK Tin học 11
Lý thuyết
Bài tập
Câu hỏi:
Bài tập 10 trang 80 SGK Tin học 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ố thập phân xuất hiện trong xâu S. Thông báo kết quả ra màn hình.
Cài đặt chương trình:
program bai10;
uses crt;
var S:string;
i,dem,n:integer;
begin
clrscr;
write('Nhap xau: ');readln(S);
n:=length(S);
dem:=0;
for i:=1 to n do
if (s[i]>='0') and (s[i]<='9') then dem:=dem+1;
write('Co ',dem,' chu so trong xau vua nhap');
readln
end.
-- Mod Tin Học 11
Copyright © 2021 HOCTAP247