Bài 10 trang 80 sgk Tin học 11

Giải bài tập Tin học 11 trang 79,80

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:

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'<=s[i]) and (s[i]<='9')
	then
	d:=d+1;
	writeln('so ki tu la so xuat hien trong xau s la ',d);
	readkey;
end.

Kết quả:

Các bài giải bài tập và trả lời câu hỏi Tin học 11 Chương 4