作业帮输入一个自然数X,求这个自然数的所有约数之积S.（Pascal)
来源：学生作业帮助网 编辑：作业帮 时间：2024/11/28 08:33:02
xN@_evuYZčbMhh `$11H23Ӻ ?kv~Mo'l@2
G(<ӛMoUxJ
㥶n-02^rqI7m,}<vKKymXE* !KBԎ|XK
nXWrŃ-8D7W: @|``;QVТcd ?1Vb;swI!?4zЏY
hҊ&=z/Y쨣i;nV4<
输入一个自然数X,求这个自然数的所有约数之积S.（Pascal)
输入一个自然数X,求这个自然数的所有约数之积S.（Pascal)
输入一个自然数X,求这个自然数的所有约数之积S.（Pascal)
program yueshuhe;
var n,i,s:longint;
begin
writeln('input n:');
readln(n);
s:=1;
for i:=2 to n do
begin
if n mod i=0 then s:=s*i;
end;
write('s=',s);
readln
end.
话说这个不是已经给你解决了吗...咋又发上来了..
还是说你问我之前已经问了
输入一个自然数X,求这个自然数的所有约数之积S.（Pascal)
编程输入一个自然数x,求这个自然数的所有约数（包括1和x本身）之和 pascal语言
输入一个自然数,求这个自然数的所有约数之和,用PASCAL语言
求帮做VB程序分支循环的综合应用一、输入一个自然数x,求这个自然数的所有约数.本题的关键是求出这个数的所有约数.若x除以y的余数为0,则y就是x的约数.所以只要从1开始到x为止,逐个去试,
一个小于200的自然数,其最小的三个约数之和是31,求这个自然数?
有一个自然数,它的最大两个约数之和是126,求这个自然数
一个自然数的最大两个约数之和是123,求这个自然数?
一个自然数的最大两个约数之和是123,求这个自然数?要算式!
一个自然数,最小两个约数的和是3,最大两个约数的和是60,求这个自然数?
用流程图表示求自然数n所有约数的算法
一个自然数的最大约数是最小约数的11倍,这个自然数是（)
一个自然数的最大约数是最小约数的11倍,这个自然数是（）
把一个自然数的约数从小到大排列,前两个约数的和为3,最后两个约数的和是252,求这个自然数.
1是所有自然数的约数吗
一个自然数的最大公约数是最小公约数的11倍,求这个自然数?打错了，先修订，一个自然数的最大约数是最小约数的11倍，求这个自然数？
如何求自然数N的约数个数和所有约数的和?
1.求240的所有约数的和2.一个自然数,有10个不同的约数,它的质因数是3或5.这个自然数最大是多少?3.恰有12个不同的约数的自然数最小是多少?这些题目我不太懂,我算出的答案是 744 1953125 60 现在
有一个自然数,它的最小的两个约数之和是,最大的两个约数之和是100,求这个自然数.