编写程序输入1~100之间能同时被2和9整除的数的和。 - VFP论坛

编程论坛 → 数据库技术 → VFP论坛 → 编写程序输入1~100之间能同时被2和9整除的数的和。

全能ASP/PHP/ASP.NET主机，支持月付	专业 MSSQL 数据库空间，支持月付	专业 MySQL 数据库空间，支持月付	学习型 ASP/PHP/ASP.NET 主机 30元/年
高端软件开发 = 年薪十万不是梦

共有 491 人关注过本帖

标题：编写程序输入1~100之间能同时被2和9整除的数的和。

收藏订阅推荐打印

xstaimo

等级：新手上路
帖子：1
积分：110
注册：2008-7-12

编写程序输入1~100之间能同时被2和9整除的数的和。

编写程序输入1~100之间能同时被2和9整除的数的和。

搜索更多相关主题的帖子: 整除编写输入

2008-7-12 11:28

qjbzjp

等级：版主
帖子：271
积分：3699
威望：6
来自：山西
注册：2007-3-14

x=0
FOR i = 1 to 100
IF I%2=0.AND.I%9=0
x=x+i
ENDIF
NEXT
thisform.text1.Value=x

2008-7-12 12:19

dyuter

等级：注册会员
帖子：50
积分：618
注册：2006-6-30

set talk off
clea
s=0
i=0
for i=1 to 100
if mod(i,2)=0 and mod(i,9)=0
s=s+i
endi
next
? s
set talk on
retu

2008-7-18 20:15

共有 490 人关注过本帖