free pascal习题某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页

来源：学生作业帮助网编辑：六六作业网时间：2024/12/20 00:18:08

freepascal习题某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页freepascal习题某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页freepascal习题

free pascal习题某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页
free pascal习题
某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页

free pascal习题某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页
var
i,j:longint;
begin
i:=0;
j:=0;
while j<202 do
begin
inc(i);
if i mod 100=1 then inc(j);
if i div 10 mod 10=1 then inc(j);
if i div 100=1 then inc(j);
end;
writeln(i);
end.

现码的你看看对不对~满意望采纳谢谢!

free pascal习题某本书从1开始,小明算了算,总共出现了202个数1,求书有多少页有没有人推荐一本高中的,有好基础的,很多都是典型例题的free pascal习题书, Free Pascal怎样产生从1到1000的100个随机数rt free pascal常见语句求几道初学 free pascal free pascal 黑洞6174 free pascal 习题把下列代数式写成Pascal表达式1/2(eu+e-u):-(a3+b3)y4:sin2(x+0.5)+3cos(2x+4):cos(x=y)/sin(|x|+|y|)的平方根 Pascal 也分 Turbo Pascal 和 Free Pascal 的推荐的三种语言是 Free Pascal ,Lazarus ,dec-c++ 上面是从知道里复制来的.请问,Delphi7和里面说到的Turbo Pascal和Free Pascal可以说是什么关系呢?Free Pascal ,Lazarus ,dec- pascal语言编程问题（free pascal求1—N中的素数的个数.(1 free pascal怎样产生随机数 Free Pascal 和Pascal的区别?为什么竞赛都用Free Pascal?Free Pascal 和Pascal的区别?为什么竞赛都用Free Pascal? 斐波那契 FREE PASCAL菲波那契数列(fbnq.pas)菲波列为1,1,2,3,5,8,13,21,…其元素产生的规则是前两个数为1,从第三个数开始,每个数等于它前面两个数之和.输入n（n 从1到9中选取3个数,要使没有两个数相邻的现象,有哪些选法?多少种?Free Pascal 做 free pascal求解输出圆周率小数点后1000000 位本题目限制代码长度,最大长度为:4096字节求Free Pascal程序问题如下：第一行输入一个正整数n（1 free pascal 求最大公约数与最小公倍数 FREE PASCAL,输入两个数,求最小公倍数 free pascal 求最大公约数与最小公倍数