pascal 齐王点兵的故事
创始人
2025-06-19 13:34:53
0次
pascal 齐王点兵的故事齐王点兵的故事。相传三齐王韩信才智过人,从不直接清点自己军队的人数,只是让士兵先后以三人一排、五人一排、七人一排地变换队形,而他每次只掠一眼队伍的排尾就知道总人数了(不超过100人)。输入三次排尾的人数,输出总人数。最好有注释。
program hxdb;
var i:integer; {循环变量i,代表人数}
x,y,z:integer; {代表三次排尾人数}
begin
readln(x,y,z); {读取三次排尾人数}
for i:=1 to 100 do {逐个检查1到100中的每一个数}
if (i mod 3 =x) and (i mod 5=y) and (i mod 7=z) {如果满足规定的尾数}
then writeln('soldier is:',i); {打印出来}
end.
mod是求余数。所谓的尾数其实就是总人数除以3,5,7后所得的余数。
相关内容