0到100的偶数用DELPHI急

来源:学生作业帮助网 编辑:作业帮 时间:2024/05/05 14:01:59
0到100的偶数用DELPHI急

0到100的偶数用DELPHI急
0到100的偶数用DELPHI

0到100的偶数用DELPHI急
文件--新建其他---控制台程序
program Project2;
{$APPTYPE CONSOLE}
uses
SysUtils;
var i:integer;
begin
for i:=0 to 100 do
if i mod 2 =0 then
write(inttostr(i)+' ');
readln;
end.
通过delphi 7.0