作业帮 > 综合 > 作业

用FREE PASCAL的简单的循环语句便一道题

来源:学生作业帮 编辑:作业帮 分类:综合作业 时间:2024/05/17 23:27:10
用FREE PASCAL的简单的循环语句便一道题
求1至500中满足以下条件的所有整数
1:用3除余2
2:用5除余3
3:用7除余2
只给具体程序段:
for i:=7 to 500 do
if (i mod 3=2) and (i mod 5=3) and (i mod 7=2) then writeln(i);
这个是最初级的.
再问: 你定了几个变量
再答: 额,i 一个好吗。。。