Delphi程序设计，有问题要问？

1.输出100-300之间不能被3整除的数。

2.设S=1*2*3*…8n,求s不大于***********时最大的n.

3.输入初始值，输出100个不能被3整除的数。

4.在组合框中输入一批整数，统计其中的偶数个数和奇数个数。

这是基本的算法。一般的Pascal基础书上都有的，强烈建议看一下相关书本，对你以后的学习有好处的。以下写下Pascal程序片断，你可以使用Memo来输出：

1.mod用来取余，余数为0则整除

2.实际是取循环次数

i := 1; s := 1;

do

s := s * i

i := i + 1

while s >= ***********

writeln(i)

3.同1

4.同1