pascal语言编程:某数被80除所得的商，不但是7的倍数，而且用2，3，4，5，6去除余数都是1，求这个自然数
答案:2 悬赏:50 手机版
解决时间 2021-01-22 14:59
- 提问者网友：眉目添风霜
- 2021-01-21 18:11
pascal语言编程:某数被80除所得的商，不但是7的倍数，而且用2，3，4，5，6去除余数都是1，求这个自然数
最佳答案
- 五星知识达人网友：走死在岁月里
- 2021-01-21 19:07
var a,f:integer;
i:longint;
begin
a:=7;f:=0;
repeat
i:=i+a;
if (i mod 2=1)
and(i mod 3=1)
and(i mod 4=1)
and(i mod 5=1)
and(i mod 6=1)
then f:=1;
until f=1;
writeln(i*80);
end.
i:longint;
begin
a:=7;f:=0;
repeat
i:=i+a;
if (i mod 2=1)
and(i mod 3=1)
and(i mod 4=1)
and(i mod 5=1)
and(i mod 6=1)
then f:=1;
until f=1;
writeln(i*80);
end.
全部回答
- 1楼网友：蓝房子
- 2021-01-21 20:42
磊磊
我要举报
如以上问答信息为低俗、色情、不良、暴力、侵权、涉及违法等信息，可以点下面链接进行举报！
大家都在看
推荐资讯