pascal字符转数字_pascal编程查找数字
问题补充：
数字查找问题 用字符串怎么编啊？求大神
最佳答案
这个不需要用字符串，拆分行了。
a是原数,s是计时器，用来保存查找到的个数，
部分程序：
s:=0;
a:=11;
for i:=1 to a do
begin
c:=i;
while(c>0)do
begin
if(c mod 10=1)then
s:=s+1;
c:=c div 10;
end;
end;
附完整代码：var s,a,i,c,b:integer;begin s:=0; readln(a); readln(b); for i:=1 to a do begin c:=i; while(c>0)do begin if(c mod 10=b)then s:=s+1; c:=c div 10; end; end; write(s);end.输入：11 1输出：4
最佳答案由网友 2015wxj 提供
其他回答
其它网友回答：
题目是什么？
追问：
假如输入11 1就从1到11的每个数字里查找有几个11比如1,10,11也就是4
其它网友回答：
应该是可以查找的。
