求用PASCAL编程统计某个自然数区间,到底有多少个3的倍数,

来源：学生作业帮编辑：百度作业网作业帮分类：综合作业时间：2024/07/14 10:14:09

求用PASCAL编程统计某个自然数区间,到底有多少个3的倍数,
输入两个自然数M和N,保证M小于N,表示M到N的区间,包含M及N
输出一个自然数X,表示M到N之间是3倍数的个数

program Project1;
var
m,n,x,i:Integer;
begin
Readln(m,n);
x := 0;
for i := m to n do
if i mod 3 = 0 then Inc(x);
Writeln(x);
Readln;
end.

求用PASCAL编程统计某个自然数区间,到底有多少个3的倍数, c++编程:输入一个自然数n,求 ,同时统计结果中有多少个0. 求vb语句：分别统计1~100中,满足3的倍数,7的倍数各有多少个? 用VB编程,统计1~100中满足3的倍数,7的倍数的数各为多少? 编程求各位数字的和为奇数的三位数(例如153),并统计这样的数有多少个. 一个自然数有十个约数,求符合条件的最小自然数,用PASCAL语言在1~1000的自然数里,是2、3的倍数,而不是5的倍数的数有多少个在1~500的自然数中,不是3的倍数也不是5的倍数的数有多少个? 在1~100中有多少个既不是3的倍数也不是5的倍数的自然数 pascal语言求n个自然数的最大公约数和最小公倍数任意取多少个自然数,其中必有2个数的差是3的倍数用C#编程输出1~100之间的能被3整除但不能被5整除的数,统计有多少个这样的数.

求用PASCAL编程 统计某个自然数区间,到底有多少个3的倍数,