VF一级与二级程序题_第1页
VF一级与二级程序题_第2页
VF一级与二级程序题_第3页
VF一级与二级程序题_第4页
VF一级与二级程序题_第5页
已阅读5页,还剩348页未读 继续免费阅读

下载本文档

版权说明:本文档由用户提供并上传,收益归属内容提供方,若内容存在侵权,请进行举报或认领

文档简介

PROPROBLEMPROANSWER编写程序,求共有几组I、J、K符合算式IJKKJI1333,其中I、J、K是09之间的一位整数。6编写程序,求四位数的偶数中,所有各位数字之和是15的倍数的数的和。1592376编写程序,求三位数的偶数中,所有各位数字之和是15的倍数的数的和。20454编写程序,求三位数的奇数中,所有各位数字之和是15的倍数的数的和。19731编写程序,求三位数的奇数中,所有各位数字之和是12的倍数的数的和。20292编写程序,求三位数的奇数中,所有各位数字之和是12的倍数的数的个数。38编写程序,求在四位数的奇数中,所有各位数字之和是25的倍数的数的和。1298515编写程序,求三位数的偶数中,所有各位数字之和是15的倍数的数的个数。34编写程序,求在四位数的偶数中,所有各位数字之和是30的倍数的数的和。288840编写程序,求1到5000之间的能被5整除的前若干个偶数之和,当和值大于500时退出,输出该和值。550编写程序,求在3000以内能被17或者23整除的正整数的个数。299编写程序,求在1000以内能被17或者23整除的正整数的个数。99一个数如果刚好与它所有的因子之和相等,则称该数为一个“完数“,如6123,则6就是一个完数。求出200到500之间所有的完数之和。496编写程序,求在5000以内能被17或者23整除的正整数的个数。499一个数如果刚好与它所有的因子之和相等,则称该数为一个“完数“,如6123,则6就是一个完数。求出1000以内的所有的完数之和。530编写程序,求四位数的偶数中,所有各位数字之和是15的倍数的数的个数。306一个数如果刚好与它所有的因子之和相等,则称该数为一个“完数“,如6123,则6就是一个完数。求出1000以内的完数的个数。3已知一个数列的前3个数为0,0,1,以后每个数为前3个数的和,编程序求此数列的第36个数。334745777一个数如果刚好与它所有的因子之和相等,则称该数为一个“完数“,如6123,则6就是一个完数。求出10000以内的完数的个数。4编写程序,求四位数的偶数中,所有各位数字之和是24的倍数的数的个数。187一个数如果刚好与小于它的所有因子之和相等,则称该数为一个“完数”,如6123,则6就是一个完数。求出400以内的所有完数之和。34编写程序,求四位数的偶数中,所有各位数字之和是24的倍数的数的和。1298328编写程序,计算在050的范围内有多少个数,其每位数的乘积大于每位数的和。23编写程序,求出17000以内能被3或者7整除的数的个数。3000编写程序,计算在050的范围内有多少个数,其每位数的乘积小于每位数的和。26编写程序,求出13000以内能被3或者5整除的数的个数。1400用一元纸币兑换一分、两分和五分的硬币,要求兑换硬币的总数为50枚,问共有多少种换法注在兑换中,一分、两分或五分的硬币数可以为0枚13编写程序,求出15000以内能被3或者7整除的数的个数。2142用一元纸币兑换一分、两分和五分的硬币,要求兑换硬币的总数为30枚,问共有多少种换法注在兑换中,一分、两分或五分的硬币数可以为0枚4编写程序,求出16000以内能被3或者5整除的数的个数。2800用一元纸币兑换一分、两分和五分的硬币,要求兑换硬币的总数为60枚,问共有多少种换法注在兑换中,一分、两分或五分的硬币数可以为0枚11把18元钱分成一元、二元和五元的纸币且纸币张数共为10张的分法有多少种(注在兑换中,一元、二元、五元的纸币张数可以为0)3把50元钱分成一元、二元和五元的纸币且纸币张数共为20张的分法有多少种(注在兑换中,一元、二元、五元的纸币张数可以为0)4编写程序,求出14000以内能被3或者11整除数的个数。1575编写程序,求出100到500之间同时满足除5余4和除7余2条件的数的个数。12编写程序,求出100到500之间同时满足除5余4和除7余2条件的数的和。3678编写程序,求四位数的奇数中,所有各位数字之积(且不为0)是125的倍数的数的和。161095编写程序,求出100到400之间同时满足除3余2和除5余3条件的数的个数。20编写程序,求四位数的奇数中,所有各位数字之积(且不为0)是60的倍数的数的和。3456254编写程序,求出100到400之间同时满足除3余2和除5余3条件的数的和。5110编写程序,求出100到200之间同时满足除3余2和除5余3条件的数的个数。6所谓回文数是从左至右与从右至左读起来都是一样的数字,如121是一个回文数。编写程序,求出100900之间的所有回文数的个数。80所谓回文数是从左至右与从右至左读起来都是一样的数字,如121是一个回文数。编写程序,求出100200的范围内所有回文数的和。1460所谓回文数是从左至右与从右至左读起来都是一样的数字,如121是一个回文数。编写程序,求在100900的范围内所有能被3整除的回文数的个数。26编写程序,求出1到300之间同时满足除3余2和除5余3条件的数的个数。20编写程序,求出100到500之间同时满足除3余2和除5余3条件的数的个数。26所谓回文数是从左至右或从右至左读起来都是一样的数字,如121是一个回文数。编写程序,求在100900的范围内所有能被3整除的回文数的和。12987编写程序,求出1到400之间同时满足除3余2和除5余3条件的数的个数。27编写程序,求出100到600之间同时满足除3余2和除5余3条件的数的个数。33编写程序,求出1到600之间同时满足除3余2和除5余3条件的数的个数。40编写程序,已知S2481632,求S不大于2500的最大值。2046有5羊4犬3鸡2兔值钱1496,4羊2犬6鸡3兔值钱1175,3羊1犬7鸡5兔值钱958,2羊3犬5鸡1兔值钱861,求鸡值多少钱23有5羊4犬3鸡2兔值钱1496,4羊2犬6鸡3兔值钱1175,3羊1犬7鸡5兔值钱958,2羊3犬5鸡1兔值钱861,求兔值多少钱29“水仙花数”是指这样的数,其各位数字的立方和等于该数本身。编写程序求100至400的范围内有多少个水仙花数。3编写程序,求在四位数的偶数中,所有各位数字之积(且不为0)是30的倍数的数的和。3415206编写程序,求在四位数的偶数中,所有各位数字之积(且不为0)是18的倍数的数的和。8638596编写程序,求在四位数的偶数中,所有各位数字之和是6的倍数的数的和。4135248“水仙花数“是指这样的数,其各位数字的立方和等于该数本身。编写程序,计算从100年开始到2000年为止,共有多少个年号是水仙花数年号。4所谓回文数是从左至右或从右至左读起来都是一样的数字,如121是一个回文数。编写程序,计算从1981年开始到3000年为止,共有多少个年号是回文数年号。11所谓素数是指这样的自然数,除1和它本身外不再有其它因子。编写程序,计算从1981年开始到3000年为止,我们将遇到多少个素数年号。131编写程序,计算1,1000以内有多少个这样的数,该数既能被6整除又能被8整除。41编写程序,求出3到200之间的所有非偶数非素数的数之和。5774编写程序,求出3到100之间的所有非偶数非素数的数之和。1441编写程序,求出3到100之间的所有非偶数非素数的数的个数。25编写程序,求出3到200之间的所有非偶数非素数的数的个数。54编写程序,计算在0至99的范围内有多少个数,其每位数的乘积大于每位数的和。63编写程序,计算在0至99的范围内有多少个数,其每位数的乘积小于等于每位数的和。37“水仙花数“是指这样的数,其各位数字的立方和等于该数本身。编写程序求100至500的范围内有多少个水仙花数。4编写程序,求在101000之间所有能被4除余3,被7除余5,被9除余2的数之和。1700编写程序,求在2001000之间所有能被4除余3,被7除余5,被9除余2的数之和。1653编写程序,计算1000以内有多少个这样的数,其个位数为6且该数能被9整除。11编写程序,计算1000以内有多少个这样的数,其十位数为6且能被8整除。15编写程序,求出1到5000之间的能被7整除的前若干个数之和,当和值大于等于1500时退出并输出和值。1617“水仙花数“是指这样的数,其各位数字的立方和等于该数本身。编写程序求100至999的范围内有多少个水仙花数。4编写程序,求出1到3000之间的能被3整除的前若干个数之和,当和值大于600时退出并输出和值。630一个数如果刚好与小于它的所有因子之和相等,则称该数为一个“完数”,求出600以内的所有完数的平方和。246836编写程序,求出1到2000之间的能被9整除的前若干个数之和,当和值大于500时退出并输出和值。594编写程序,求在101000之间所有能被4除余3,被7除余4,被9除余4的数之和。1780编写程序,求出1到6000之间的能被5整除的前若干个偶数之和,当和值大于650时退出并输出和值。660编写程序,求在2001000之间所有能被4除余3,被7除余4,被9除余4的数之和。1713编写程序,求出1到7000之间的能被5整除的前若干个偶数之和,当和值大于500时退出并输出和值。550编写程序,求在2001000之间所有能被5除余3,被7除余5,被9除余7的数之和。1884编写程序,求出1到4000之间的能被5整除的前若干个偶数之和,当和值大于400时退出并输出和值。450编写程序,求在5001000之间所有能被5除余3,被7除余5,被9除余7的数的平方和。1283633编写程序,求出1到8000之间的能被5整除的前若干个偶数之和,当和值大于750时退出并输出和值。780编写程序,求在101000之间所有能被4除余3,被7除余4,被9除余4的数的平方和。1109620一个数如果刚好与小于它的所有因子之和相等,则称该数为一个“完数”,如6123。求出10000以内的所有完数之和。8658一个数如果刚好与小于它的所有因子之和相等,则称该数为一个“完数”,求出1000以内的所有完数的平方和。246836编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是8的倍数,且ABBC,即第1位数加上第2位数等于第2位数加上第3位数。110编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是18的倍数,且D6,ABBC,即第1位数加上第2位数等于第2位数加上第3位数。10编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是16的倍数,且B8,,ABBC,即第1位数加上第2位数等于第2位数加上第3位数。5编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是18的倍数,且C7,ABCD,即第1位数加上第2位数等于第3位数加上第4位数。9编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是8的倍数,且ADBC,即第1位数加上第4位数等于第2位数加上第3位数。77编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是15的倍数,且ADBC,即第1位数加上第4位数等于第2位数加上第3位数。45编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是9的倍数,且ABC,即第2位数加上第3位数等于第1位数。64编写程序,求在2002000之间所有能被4除余2,被7除余3,被9除余5的数之和。7910编写程序,求在101000之间所有能被4除余2,被7除余3,被9除余5的数之和。2000编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是11的倍数,且ABC,即第2位数加上第3位数等于第1位数。49编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是8的倍数,且ACB,即第1位数加上第3位数等于第2位数。57编写程序,求满足下列条件的所有四位数ABCD的个数,该四位数是5的倍数,且ADBC,即第1位数加上第4位数等于第2位数加上第3位数。123编写程序,求一正整数等差数列的前六项的平方和,该数列的前四项之和是26、之积是880。699编写程序,统计200400之间的所有满足三个数字之积为42,三个数字之和为12的数的个数。4编写程序,统计200300之间的所有满足三个数字之积为24,三个数字之和为10的数的个数。2编写程序,统计10009999之间的所有满足以下条件的四位数的个数。该四位数是一个完全平方数,且其第1位与第3位数字之和为10,第2位与第4位数字之积为12。2已知一个数列的前3个数为0,1,2,以后每个数为前3个数的和,编写程序求此数列的第30项。24548655编写程序,统计10009999之间的所有满足以下条件的四位数的个数。该四位数是一个完全平方数,且其第1位与第3位数字之和为12,第2位与第4位数字之积为24。1已知一个数列的前3个数为0,1,1,以后每个数为前3个数的和,编程序求此数列的第20项。35890编写程序,求一正整数等差数列的前六项的和,该数列前四项之和是26,四项之积是880。57已知一个数列的前3个数为0,1,2,以后每个数为前3个数的和,编程序求此数列的第25项。1166220有5羊4犬3鸡2兔值钱1496,4羊2犬6鸡3兔值钱1175,3羊1犬7鸡5兔值钱958,2羊3犬5鸡1兔值钱861,求羊值多少钱177已知一个数列的前3个数为1,2,3,以后每个数为前3个数的和,编程序求此数列的第20项。101902有5羊4犬3鸡2兔值钱1496,4羊2犬6鸡3兔值钱1175,3羊1犬7鸡5兔值钱958,2羊3犬5鸡1兔值钱861,求犬值多少钱121已知一个数列的前3个数为0,1,2,以后每个数为前3个数的和,编程序求此数列的第35项。516743378编写程序,计算在0,60的范围内有多少个数,其每位数的乘积大于每位数的和。31已知一个数列的前3个数为1,2,3,以后每个数为前3个数的和,编程序求此数列的第35项。950439251编写程序,求一正整数等差数列的前三项的和,该数列前四项之和是26、之积是880。15已知一个数列的前3个数为3,4,5,以后每个数为前3个数的和,编程序求此数列的第28项。25527448编写程序,求一正整数等差数列的前五项的和,该数列前四项之和是26、之积是880。40已知一个数列的前3个数为3,4,5,以后每个数为前3个数的和,编程序求此数列的第33项。537346739编写程序,求一正整数等差数列的前三项的平方和,该数列前四项之和是26、之积是880。93已知一个数列的前3个数为3,4,5,以后每个数为前3个数的和,编程序求此数列的第26项。7545856编写程序,求一正整数等差数列的前五项的平方和,该数列前四项之和是26、之积是880。410编写程序,已知S2481632,求S不大于1500的最大值。1022编写程序,统计10009999之间的所有满足以下条件的四位数的个数。该四位数是一个完全平方数,且其第1、3位数字之和为6,第2、4位数字之积为24。1编写程序,已知S2481632,求S不大于980的最大值。510有30个学生一起买小吃,共花钱50元,其中每个大学生花3元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生数为0的解)9编写程序,已知S2481632,求S不大于3000的最大值。2046有50个学生一起买小吃,共花钱100元,其中每个大学生花3元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生数为0的解)24编写程序,已知S2481632,求S不大于5000的最大值。4096编写程序,求一正整数等差数列的前五项的立方和,该数列前四项之和是26、之积是880。4720编写程序,已知S13579,求S不大于750的最大值。729编写程序,统计10009999之间的所有满足以下条件的四位数的个数。该数是一个完全平方数,且第1、2位数字之和为12,第3、4位数字之积为24。1编写程序,已知S13579,求S不大于1200的最大值。1156编写程序,统计10009999之间的所有满足以下条件的四位数的个数。该数是一个完全平方数,且其第1、2位数字之和为10,第3、4位数字之积为18。1编写程序,已知S2481632,求S不大于9000的最大值。8190编写程序,求四位数的奇数中,每位数字之和是15的倍数的数的和。1533459编写程序,已知S13579,求S不大于1300的最大值。1296有40个学生一起买小吃,共花钱100元,其中每个大学生花5元,每个中学生花3元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的解)14编写程序,已知S13579,求S不大于9000的最大值。8836有36个学生一起买小吃,共花钱100元,其中每个大学生花3元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的解)3编写程序,已知S13579,求S不大于1000的最大值。961有50个学生一起买小吃,共花钱200元,其中每个大学生花5元,每个中学生花3元,每个小学生花2元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的)8有50个学生一起买小吃,共花钱120元,其中每个大学生花4元,每个中学生花3元,每个小学生花2元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的解)9有60个学生一起买小吃,共花钱100元,其中每个大学生花3元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的)19有50个学生一起买小吃,共花钱120元,其中每个大学生花4元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的)13有20个学生一起买小吃,共花钱50元,其中每个大学生花3元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的)4编写程序,求1,1000既能被6整除又能被7整除的数的个数。23有48个学生一起买小吃,共花钱120元,其中每个大学生花3元,每个中学生花2元,每个小学生花1元,问大、中、小学生的人数分配共有多少种不同的解(去掉某类学生为0的解)11编写程序,求1,500既能被3整除又能被5整除的数的个数。33编写程序,求1,500既能被6整除又能被7整除的数之和。2772求出10,1000内所有能被7和9中至少一个数整除的整数的个数。SETTALKOFFCLEARN0FORX10TO1000IFMODX,70ANDMODX,90NNXENDIFENDFORNSETTALKONRETURN236求出10,1000内所有能同时被7和9整除的整数之和。SETTALKOFFCLEARS0FORX10TO1000IFMODX,70ANDMODX,90SXENDIFENDFORXSETTALKONRETURN7560求出10,1000内所有能被6整除但不能被9整除的整数之和。SETTALKOFFCLEARS0FORX10TO1000IFMODX,60ORMODX,90XSXENDIFENDFORSSETTALKONRETURN55440求出10,1000内所有能被6和9中的一个且只有一个数整除的整数的个数。SETTALKOFFCLEARN0FORX10TO1000IFMODX,60ANDMODX,90ANDMODX,60ANDMODX,90NXENDIFENDFORNSETTALKONRETURN165求出100,800内所有既不能被5整除也不能被7的整数的个数。SETTALKOFFCLEARN0FORX100TO800IFMODX,50ANDMODX,70NX1ENDIFENDFORXSETTALKONRETURN480求出101,299内所有能被2整除但不能同时被3和5整除的整数之和。SETTALKOFFCLEARS0FORX101TO299IFMODX,20ANDNOTMODX,30ANDMODX,50XSXENDIFENDFORSSETTALKONRETURN18630求出100以内最大的自然数N,使得从1开始的连续N个自然数的倒数之和小于35。SETTALKOFFCLEARS0FORN1TO100SS1/NIFS35LOOPENDIFENDFORN1SETTALKONRETURN18求出100以内最小的自然数N,使得从1开始的连续N个自然数的倒数之和大于36。SETTALKOFFCLEARS0FORN1TO100SS1/NIFS5000EXITENDIFENDFORNSETTALKONRETURN24求出100以内最小的自然数N,使得从1开始的连续N个自然数的平方之和大于5500。SETTALKOFFCLEARS0FORN1TO100SSNNIFS20000EXITENDIFENDFORNSETTALKONRETURN16求出100以内最小的自然数N,使得从1开始的连续N个自然数的立方之和大于30000。SETTALKOFFCLEARS0FORN1TO100SSNN3IFS30000LOOPENDIFENDFORNSETTALKONRETURN19求出50以内最大的自然数N,使得从102开始的连续N个偶数之和小于3000。SETTALKOFFCLEARS0FORN1TO50A1002NSSAIFS3000LOOPENDIFENDFORN1SETTALKONRETURN23求出50以内最小的自然数N,使得从102开始的连续N个偶数之和大于2000。SETTALKOFFCLEARS0FORN1TO50A1022NSSAIFS2000LOOPENDIFENDFORNSETTALKONRETURN17求出50以内最大的自然数N,使得从101开始的连续N个奇数之和小于2000。SETTALKOFFCLEARS0FORN1TO50A992NSSAIFS3000EXITENDIFENDFORSSETTALKONRETURN25求出100以内使得算式1223NN1的值小于5000的最大的自然数N。SETTALKOFFCLEARS0FORN1TO100ANN1SSAIFS10000LOOPENDIFENDFORN1SETTALKONRETURN23求出100以内使得算式11212N的值小于1000的最大的自然数N。SETTALKOFFCLEARS0T0FORN1TO100SSNTTSIFT1500EXITENDIFENDFORNSETTALKONRETURN20求出100以内使得算式1/121/231/NN1的值小于0952的最大的自然数N。SETTALKOFFCLEARS0FORN1TO100SS1/NN1IFS135LOOPENDIFENDFORNSETTALKONRETURN14求出100以内的最大的自然数N,使得算式11/121/12N的值小于19。SETTALKOFFCLEARS0T0FORN1TO100SS1/NTTSIFT19EXITENDIFENDFORN1SETTALKONRETURN18求出100以内使得算式11/121/12N的值大于171828的最小的自然数N。SETTALKOFFCLEARA100000000S000000000FORN1TO100AA/NSSAIFS2LOOPENDIFENDFORNSETTALKONRETURN18设等比数列1,2,4,8,。求使得此数列的前N项之和大于100000的最小的自然数N。SETTALKOFFCLEARA1S1FORN1TO100SSAIFS100000EXITENDIFA2AENDFORNSETTALKONRETURN17设等比数列1,2,4,8,。求使得此数列的前N项之和小于2345678的最大的自然数N。SETTALKOFFCLEARA1S0FORN1TO100SSAIFS2345678EXITENDIFA2AENDFORNSETTALKONRETURN21设等比数列1,3,9,27,。求使得此数列的前N项之和大于2345678的最小的自然数N。SETTALKOFFCLEARA1S0FORN1TO100SSAIFS2345678EXITENDIFA3AENDFORNSETTALKONRETURN14设等比数列1,3,9,27,。求使得此数列的前N项之和小于9876543的最大的自然数N。SETTALKOFFCLEARA1S0FORN1TO100SSAIFS0LOOPENDIFENDFORKSETTALKONRETURN268801求所有符合算式ABBA2701的最小的两位数AB(即A10B)。其中A、B是19之间的一位整数。SETTALKOFFCLEARFORX11TO99AX/10BMODX,10Y10ABIFXY2701EXITENDIFENDFORXSETTALKONRETURN37已知数列1,2,4,7,11,16,,其规律是相邻两项之差依次是1,2,3,4,5,。试求出此数列中大于5000的最小的项。SETTALKOFFCLEARA1FORN0TO1000AANIFA5000LOOPENDIFENDFORNSETTALKONRETURN5051已知数列1,2,4,7,11,16,,其规律是相邻两项之差依次是1,2,3,4,5,。试求出此数列中小于6000的最大的项。SETTALKOFFCLEARA0FORN0TO1000IFAN800EXITENDIFENDFORNSETTALKONRETURN17已知数列FNF11,F24,当N3,4,5,时,FN3FN1FN2。试求出100以内最小的自然数N使得此数列的第N项大于87654321。SETTALKOFFCLEARDIMENSIONF100F11F24FORN3TO100FN3FN1FN2IFFN88888EXITENDIFENDFORASETTALKONRETURN24求出100以内最大的自然数N,使得从1开始的连续N个自然数的立方之和小于999999。SETTALKOFFCLEARS0FORN1TO100ANNNSSAN,A,SIF678EXITENDIFENDFORNSETTALKONRETURN13一球从100米高处落至平地,并且连续多次再反弹再落下,假设每次反弹的高度都是前一高度的3/4倍,试求出最大的自然数N,使得此球从开始下落至第N次着地时在垂直方向所经过的总路程不超过590米。SETTALKOFFCLEARH100S0FORN1TO100H3/4HSS2HIFS590EXITENDIFENDFORN1SETTALKONRETURN6设一数列FNF11,当N1时FN1/FN11。试求出此数列的前20项中小于0618的项的数目。SETTALKOFFCLEARF1000000N0FORK1TO20F1/F1IFF1时FN1/FN11。试求出此数列的前20项中大于0618的项的数目。SETTALKOFFCLEARF100000000N0FORK2TO20F1/F1IFF0618NN1ENDIFK,F,NENDFORNSETTALKONRETURN15设有用26个字母表示的26个表达式A1,B1/A1,C1/B2,Z1/Y25。试求出这26个字母中其值小于01的字母个数。SETTALKOFFCLEARLETT1N0FORK1TO26LETT1/LETTKIFLETT54321NN1ENDIFF1F2F2F3F3F1ENDFORNSETTALKONRETURN5已知一个由分数组成的数列1/2,3/5,8/13,21/34,其特点是从其中第2个分数起,每个分数的分子都是前一分数的分子分母之和而其分母都是其分子与前一分数的分母之和。试求出此数列的前25项中其值大于0618的项数。SETTALKOFFCLEARF11F22N0FORK1TO25FF1/F2IFF0618NN1ENDIFF1F2F2F1ENDFORNSETTALKONRETURN20已知数列FNF11,F24,当N3,4,5,时,FN3FN1FN2。试求出100以内最大的自然数N使得此数列的第N项不超过7654321。SETTALKOFFCLEARF11F24FORN3TO100F3F2F1N,FIFF0618NN1ENDIFFF1F2F1F2FF2FF1ENDFORNSETTALKONRETURN29已知一个由分数组成的数列1/2,2/3,3/5,5/8,8/13,其特点是从第2个分数起,每个分数的分子都是前一分数的分母而其分母都是其前一分数的分子与分母之和。试求出此数列的前25项中其值小于0618的项数。SETTALKOFFCLEARF11F22N0FORK1TO25GF2/F1IFGCORABANDACNN1ENDIFENDFORNSETTALKONRETURN209求出123,456内恰好有两个数字相同的所有整数之和。SETTALKOFFCLEARS0FORX123TO456AINTX/100BINTXA100/10CMODX,1IFABANDACORABANDACSSXENDIFENDFORSSETTALKONRETURN26406求在100,999内所有不含数字0且各位数字之积被96整除的数之和。SETTALKOFFCLEARS0FORX100TO999AINTX/100BINTXA100/10CMODX,1IFMODABC,960SSXENDIFENDFORSSETTALKONRETURN26640求在100,999内所有不含数字0且各位数字之和被14整除的数之和。SETTALKOFFCLEARS0FORX100TO999AINTX/100BINTXA100/10CXA100B10IFMODABC,140SXENDIFENDFORSSETTALKONRETURN31080求出100,600内被除3余2并且被除5余3的整数的个数。SETTALKOFFCLEARN0FORX100TO600IFMODX,3523NX1ENDIFENDFORNSETTALKONRETURN33求出200,800内被除3余1并且被除5余3的整数的和。SETTALKOFFCLEARS0FORX200TO800IFMODX,31ORMODX,53SS1ENDIFENDFORSSETTALKONRETURN20020求出1234,6789内中间两位数字之和等于首尾两位数字之积的数的个数。SETTALKOFFCLEARN0FORX1234TO6789AINTX/1000BINTXA1000/100CINTXA1000B100/10DXA1000B100C10IFBCADNN1ENDIFENDFORNSETTALKONRETURN175求出1234,6789内至少有两位数字是7的所有整数之和(注意AT函数和STR函数的功能)。SETTALKOFFCLEARS0FORX1234TO6789IFAT7,STRX,20SXENDIFENDFORSSETTALKONRETURN678981求出750,950内最多有一位数字是8的所有整数之和(注意AT函数和STR函数的功能)。SETTALKOFFCLEARS0FORX750TO950IFAT8,STRX,20SXENDIFENDFORSSETTALKONRETURN153575求出1234,2345内恰好有两位数字是6的所有整数之和(注意AT函数和STR函数的功能)。SETTALKOFFCLEARS0FORX1234TO3456IFAT6,STRX,20ANDAT6,STRX,30SS1ENDIFENDFORSSETTALKONRETURN124266将大于1000且能被4和6中至少一个数整除的所有整数按从小到大顺序排列后,求前面20个数之和。SETTALKOFFCLEARS0K0X1000DOWHILEK0RMODA,PIFR1N1ENDIFAINTA/PENDDONSETTALKONRETURN13求出将十进制整数98765432等值转换为二进制形式表示后其中数字0的个数。(提示模拟人工计算的“2除取余”法)SETTALKOFFCLEARA98765432P2N0DOWHILEA0RMODA,PIFR0NP1ENDIFAINTA/PENDDONSETTALKONRETURN14求出将十进制整数99887766554等值转换为十六进制形式表示后其中字母C的个数。(提示模拟人工计算的“16除取余”法)SETTALKOFFCLEARA99887766554P16N0DOWHILEA0RMODA,PIFR11NNRENDIFAINTA/PENDDONSETTALKONRETURN2已知数列FNF11,F21,当N2时FNFN2FN1。试求此数列的第15项至第25项共11项之和。SETTALKOFFCLEARDIMENSIONF25F11F21S0FORN3TO25FNFN2FN1IFN2时FN3FN2FN1。试求此数列的前20项中所有正数项之和。SETTALKOFFCLEARDIMENSIONF20F11F21S0FORN3TO20FN3FN1FN2IFFN0SSFNENDIFENDFORSSETTALKONRETURN343371求出将十进制小数0987654321等值转换为二进制形式表示后前25位小数中数字0的个数。(提示使用“2乘取整”法)SETTALKOFFCLEARX0987654321N0FORK1TO25X2XZINTXXXZIFZ1NNZENDIFENDFORNSETTALKONRETURN8求出将十进制小数056789等值转换为八进制形式的表示中前18位小数中数字3的个数。(提示使用“8乘取整”法)SETTALKOFFCLEARX056789N0FORK1TO18X8XZINTXXXZIFZ3NNZENDIFENDFORNSETTALKONRETURN3对自然数A、B、C,若AZMAXZENDIFENDFORMAXSETTALKONRETURN127求方程3X7Y1在条件|X|0ANDMAXZMAXZENDIFENDFORMAXSETTALKONRETURN237求方程9X4Y2000的所有正整数解的|XY|的最小值。SETTALKOFFCLEARMIN0FORX1TO230YINT10009X/4ZABSXYIF9X4Y1000ANDY0ANDMINZMINZENDIFENDFORMINSETTALKONRETURN3已知数列FNF11,F24,当N3,4,5,时,FN3FN1FN2。试求出100以内最大的自然数N使得此数列的第N项小于5364321。SETTALKOFFCLEARDIMENSIONF100F11F24FORN3TO100FN3FN1FN2IFFN5364321LOOPENDIFENDFORNSETTALKONRETURN16已知数列FNF11,F24,当N3,4,5,时,FN3FN1FN2。试求出100以内最大的自然数N使得此数列的前N项之和首次大于75364321。SETTALKOFFCLEARDIMENSIONF100F11F24S0FORN3TO100FN3FN1FN2SSFNIFSABCMAXABCENDIFENDIFENDFORMAXSETTALKONRETURN6000对自然数A、B、C,若AXXMIN1ENDIFENDIFENDFORMAX1MIN1SETTALKONRETURN8154设某四位数的各位数字的平方和等于198,问满足这种条件的最大数和最小数之和是多少SETTALKOFFCLEAMIN11000MAX11000FORX1000TO9999AINTX/1000BINTXA1000/100CINTX/100/10DMODX,10IFAABBCCDD198IFMAX1XMIN1XENDIFENDIFENDFORMAX1MIN1SETTALKONRETURN12749把一张一元钞票,换成一分、二分和五分硬币,每种至少11枚,问有多少种方案SETTALKOFFCLEAN1FORYI11TO100FORER11TO20FORWU11TO20IFYIERWU100NN1ENDIFENDFORENDFORENDFORNSETTALKONRETURN13把一张一元钞票,换成一分、二分和五分硬币,每种至少1枚,问有多少种方案SETTALKOFFCLEAN0FORYI1TO100FORER1TO20FORWU1TO20IFYIERWU100NNYIENDIFENDFORENDFORENDFORNSETTALKONRETURN461把一张一元钞票,换成一分、二分和五分硬币,每种至少1枚,问兑换后硬币总数为50枚的兑换方案有多少种SETTALKOFFCLEAN0FORYI1TO50FORER1TO50FORWU1TO20IFYIERWU50NN1ENDIFENDFORENDFORENDFORNSETTALKONRETURN12把一张一元钞票,换成一分、二分和五分硬币,每种至少1枚,问兑换后硬币总数最多的与硬币总数最少的枚数之差是多少SETTALKOFFCLEAMIN10MAX10FORYI1TO100FORER1TO50FORWU1TO20IFYIERWU100TYIERWUIFTMAX1TMAX1ENDIFIFMIN1TMIN1TENDIFENDIFENDFORENDFORENDFORMAX1MIN1SETTALKONRETURN73把一张一元钞票,换成一分、二分和五分硬币,每种至少1枚,问兑换后其中二分的硬币恰有20枚的方案共有多少种SETTALKOFFCLEAN1FORYI1TO50FORWU1TO20ER20IFYIERWU100NN1ENDIFENDFORENDFORNSETTALKONRETURN11找满足以下条件X2Y2412且XY之值最大的二个正整数X,Y,求XY之值SETTALKOFFCLEAMAX1000FORX0TO41FORY0TO41IFXXYY4141IFMAXXYMAXXYENDIFENDIFENDFORENDFORMAXSETTALKONRETURN49找满足以下条件X2Y2412且XY之值最小的二个正整数X,Y,求XY之值SETTALKOFFCLEAMIN1FORX0TO41FORY0TO41IFXXYY4141IFMIN0NUNU1ENDIFENDFORNUSETTALKONRETURN28已知24有8个正整数因子即1,2,3,4,6,8,12,24,而24正好被其因子个数8整除。求300,1000之间能被其因子数目整除的数的总和。SETTALKOFFCLEASM0FORN300TO1000S0FORI2TON1IFN/I0SS1ENDIFENDFORIFMODN,S0SMSMXENDIFENDFORSMSETTALKONRETURN36550已知24有8个正整数因子即1,2,3,4,6,8,12,24,而24正好被其因子个数8整除。求200,300之间能被其因子数目整除的数中最小的数。SETTALKOFFCLEAMIN0FORN200TO300S0FORI1TON1IFMODN,I0SS1ENDIFENDFORIFMODN,S0MINNLOOPENDIFENDFORMINSETTALKONRETURN204已知24有8个正整数因子即1,2,3,4,6,8,12,24,而24正好被其因子个数8整除。求200,300之间能被其因子数目整除的数中且能被3整除的数之和。SETTALKOFFCLEASUM0FORN200TO300S0FORI1TONIFMODN,I0SS1ENDIFENDFORIFMODN,S0ORMODN,30SUMSUMNENDIFENDFORSUMSETTALKONRETURN1713已知24有8个正整数因子即1,2,3,4,6,8,12,24,而24正好被其因子个数8整除。求200,1000之间能被其因子数目整除的数中且能被3整除的数的个数。SETTALKOFFCLEASUM0FORN200TO1000S0FORI1TON1IFMODN,I0SS1ENDIFENDFORIFMODN,S0ORMODN,30SUMSUM1ENDIFENDFORSUMSETTALKONRETURN40分子分母为正整数,分子小于分母的分数称为真分数。对于分数的分子分母取值范围为50,90且分母能被3整除的真分数共有多少个SETTALKOFFCLEAN1FORA50TO90FORB50TO90IFMODB,30NN1ENDIFENDFORENDFORNSETTALKONRETURN287分子分母为正整数,分子小于分母的分数称为真分数。对于分数的分子分母取值范围为50,90且分母能被3整除、分子能被5整除的真分数共有多少个SETTALKOFFCLEAN1FORA50TO89FORB50TO90IFMODB,30NN1ENDIFENDFORENDFORNSETTALKONRETURN6363求S11/21/31/4的前100项之和(精确到小数点后4位)SETTALKOFFCLEAS10000F1FORI1TO100SSF/IFFENDFORSRETURN06882求S11/31/51/7的前100项之和(精确到小数点后4位)SETTALKOFFCLEAS10000F1FORI1TO100SSF/2I1F1FENDFORSRETURN07829梅森尼数是指能使2N1为素数的数N,求1,21范围内最大的梅森尼数SETTALKOFFCLEAMAX0S1FORX2TO21SS2FLAG1FORI2TOINTSQRTS1IFMODS,I0FLAG0EXITENDIFENDFORIFFLAG0MAXXENDIFENDFORMAXRETURN19梅森尼数是指能使2N1为素数的数N,求1,21范围内的梅森尼数的个数SETTALKOFFCLEAN0S2FORX2TO21SS2FLAG1FORI1TOINTSQRTXIFMODS1,I0FLAG0EXITENDIFENDFORIFFLAG0NN1ENDIFENDFORNRETURN14梅森尼数是指能使2N1为素数的数N,求1,21范围内所有梅森尼数之和SETTALKOFFCLEASUM0S2FORX2TO21SS2FLAG1FORI2TOINTSQRTS1IFMODS,I0FLAG0EXITENDIFENDFORIFFLAG1SUMSUMSENDIFENDFORSUMRETURN66PROPROBLEMPROANSWER已知A2试求F50值。提示最好使用递推法求解,因为使用递归调用很可能超出某些语言的递归深度。12586269025已知FIBONACCI数列1,1,2,3,5,8,它可由下面公式表述F11IFN1F21IFN2FNFN1FN2IFN2试求F2F4F6F50值。提示最好使用递推法求解,因为使用递归调用很可能超出某些语言的递归深度。20365011073已知FIBONACCI数列1,1,2,3,5,8,它可由下面公式表述F11IFN1F21IFN2FNFN1FN2IFN2试求F45值。

温馨提示

  • 1. 本站所有资源如无特殊说明,都需要本地电脑安装OFFICE2007和PDF阅读器。图纸软件为CAD,CAXA,PROE,UG,SolidWorks等.压缩文件请下载最新的WinRAR软件解压。
  • 2. 本站的文档不包含任何第三方提供的附件图纸等,如果需要附件,请联系上传者。文件的所有权益归上传用户所有。
  • 3. 本站RAR压缩包中若带图纸,网页内容里面会有图纸预览,若没有图纸预览就没有图纸。
  • 4. 未经权益所有人同意不得将文件中的内容挪作商业或盈利用途。
  • 5. 人人文库网仅提供信息存储空间,仅对用户上传内容的表现方式做保护处理,对用户上传分享的文档内容本身不做任何修改或编辑,并不能对任何下载内容负责。
  • 6. 下载文件中如有侵权或不适当内容,请与我们联系,我们立即纠正。
  • 7. 本站不保证下载资源的准确性、安全性和完整性, 同时也不承担用户因使用这些下载资源对自己和他人造成任何形式的伤害或损失。

评论

0/150

提交评论