程序代码:program ygb;{$apptype console} //设置程序为非图形界面,TURBO PASCAL等无需这一行function ss(x:integer):boolean;var i:integer;beginss:=false;for i:=2 to x-1 doif x mod i=0 then exit;ss:=true;en...
PASCAL将1,2,3,4,5,6,7,8,9组成一个三位数,必须是素数,回文数
1个回答
相关问题
-
1.2.3.4.5.6.7.8.9.10.十个数可以组成几个三位数
-
1.2.3.4.5.6.7.8.9可以组成哪些四位数
-
将自然数1,2,3,4,5,6,7,8,9依次重复写下去组成一个百位数,这个数是3的倍数吗?
-
将自然数1,2,3,4,5,6,7,8,9依次重复写下去组成一个百位数,这个数是3的倍数吗?
-
从0,1,2,3,4,5,6,7,8,9选九个数组成一个两位数,一个三位数,一个四位数,要求这三个数相加得2010,没有
-
1.2.3.4.5.6.7.8.9.这些数可以组成几组6位的数
-
用“0,1,2,3,4,5,6,7,8,9”组成三位数,一共能组成多少个?分别是?
-
将1,2,3,4,5,6,7,8,9,依次重复写下去,组成一个2008位的数,试问,这个数能否被9整除
-
三个数字都是1.2.3.4.5.6.7.8.9能组成哪几个三位数?
-
用1~9数字组成4位数字用1,2,3,4,5,6,7,8,9组成一个4位数,然后乘以一个数,等于另一个四位数,其中这9个