用C#编程输出1~100之间的能被3整除但不能被5整除的数，统计有多少个这样的数。

static void Main(string[] args)
{
int sum = 0; //定义一个变量接收能被3整除但不能被5整除的数的个数
for (int i = 1; i <= 100;i++ ) //从1到100循环
{
if (i % 3 == 0 && i % 5 != 0) //是否满足能被3整除但不能被5整除
{
sum = sum + 1; //如果满足则个数加1
}
}
Console.WriteLine(sum); //输出个数
}

var
count,i:integer;
begin
count:=0;
for i:=1 to 100 do
begin
if ((i mod 3)=0) and ((i mod 5)<>0) then
begin
Memo1.lines.Add(inttostr(count));
Inc(count);
//或count:=count+1;
end;
end;
showmessage(IntToStr(count));
end;