任意给定正整数n、c,找一个正整数m,使m*n的值的数字由0、1、2、……、C( 0 < C
来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/17 23:17:02
任意给定正整数n、c,找一个正整数m,使m*n的值的数字由0、1、2、……、C( 0 < C
program ling;
var i:longint;g,n,c:qword;{越大越好}
function ss(i:qword):boolean;
var j:longint;s,d:set of 0..9;{设s,d两个集合}
begin s:=[];{初始集合为空}
for j:=0 to c do s:=s+[j];d:=s;{把集合s给集合d}
while i0 do begin{如果I不等于零}
if not(i mod 10 in d) then begin ss:=false;exit;end;{判断 最后一位是否在集合中}
s:=s-[i mod 10];{减去最后一位}i:=i div 10;{I将最后一位舍去}
end; if s=[] then ss:=true{如果集合为空i值为真}
else ss:=false;end;{不是值为假}
begin
read(n,c);{输入}
for i:=1 to 100000 do{一千次循环}
begin
g:=n*i;{g是乘积}
if ss(g) then begin{判断是不是}
write(i);halt;end;{是就输出;结束}
end;
write('No find!');{如果没有就输出No find!}
end.
望楼主采纳!小弟感谢不尽!
var i:longint;g,n,c:qword;{越大越好}
function ss(i:qword):boolean;
var j:longint;s,d:set of 0..9;{设s,d两个集合}
begin s:=[];{初始集合为空}
for j:=0 to c do s:=s+[j];d:=s;{把集合s给集合d}
while i0 do begin{如果I不等于零}
if not(i mod 10 in d) then begin ss:=false;exit;end;{判断 最后一位是否在集合中}
s:=s-[i mod 10];{减去最后一位}i:=i div 10;{I将最后一位舍去}
end; if s=[] then ss:=true{如果集合为空i值为真}
else ss:=false;end;{不是值为假}
begin
read(n,c);{输入}
for i:=1 to 100000 do{一千次循环}
begin
g:=n*i;{g是乘积}
if ss(g) then begin{判断是不是}
write(i);halt;end;{是就输出;结束}
end;
write('No find!');{如果没有就输出No find!}
end.
望楼主采纳!小弟感谢不尽!
任意给定正整数n、c,找一个正整数m,使m*n的值的数字由0、1、2、……、C( 0 < C
任意给出一个正整数N,找一个正整数M,使得N*M的值的数字由0,1,...C组成,且这些数字最少出现一次.
如果m,n是任意给定的正整数(m>n),证明:m+n、2mn、m-n是勾股数
c语言 求两个正整数m,n的最小公倍数
c语言编程 给定一个自然数N(1≤N≤1000),统计出所有不超过N的正整数中数字0到9出现的次数,并且依次打印出来每个
C程序设计:输入2个正整数m和n(1
证明:任意给定正整数m,n,且m大于n,则m的平方-n的平方,2mn,m方+n方一定是勾股数.
如果m、n是任意给定的正整数(m>n),证明m^2+n^2、2mn、m^2-n^2是勾股数
如果m、n是任意给定的正整数(m>n),证明:m²+n²、2mn、m²-n²是勾
给定正整数n 和m,计算出n 个元素的集合{1,2,.,n }可以划分为多少个不同的由m 个非空子集组成的集合.
n为正整数,a,b,c为有理数,对所有整数m,代数式1/n×m³+am²+bm+c的值都是整数,求n
c语言 输入两个正整数m和n,求出[m,n]区间的所有素数