如何用VBA求出10到1000内能被7或9整除的数有哪些?

刚看到,首先你确认你数字正确不?其次说下,excel还真是无所不能.用LINEST函数就可以求出.具体格式看图片 公式看下面=IF(ISERROR(LINEST(C2:C6,A2:B6,1,

1.瞬时斜率：求导.方法：d(k)=(u(k)-u(k-1))/T(k);d(0)=0;其中d就是瞬时斜率2.平均斜率：求拟合.方法：p=polyfit(x,y,1)其中p的第一个数就是斜率再问：额，

我是来学习的,因为我不太清楚什么是插值什么是直线什么是线性,我猜测直线插值,就是按比例插值（如果这里猜测错了,楼主就不用往下看了,但请指教)150焓值=(266.36-132.43)/(200-100

Analysis>FitPolynomial>选择需要拟合的级数!最后一排：ShowFomulaonGragh?打勾!然后拟合好的图上就有拟合的函数了～

=A1/SUM($A$1:$C$1),向右复制公式.=A1/SUM($A$1:$A$3),向下复制公式.再问：能具体点么?不太懂，谢啦！再答：你没有说数据都放在哪些单元格。所以你就假如了两种情况。第一

∂u/∂r=(∂u/∂x)(∂x/∂r)+(∂u/∂y)(∂y/∂r)　　　　=

请下载2002年的一篇文章：《拟合圆的几种方法》里面有方法介绍和mathematica的实现代码这篇文章我提交文库了,但似乎还没有通过审核,如需要回头你自己在文库搜搜看,没的话自己找地方去求.里面的最

tic,x=solve('5*(3+0.4*x)^(-1/2)-(3+0.8*x/1.1)^(-1/2)-8'),tocx=-6.5551941144469815146626286219410+.17

有两个单词就增行并缩写?代码如下Subtest()Dimarr,brr(),x&,i&,j&arr=Range("A1:A"&Range("A65536").End(xlUp).Row)Forx=1T

25和125最大公因数是5×5＝25

想法是好的,不过这个是不现实的,因为do-loop语句只是语句,不是局域过程.首先你要怎么显示询问语句呢?这里给你假设一条途径来说明一下吧：假设你是想出现结果以后单击确定按钮（name属性是comma

能够产生一组随机数会了.五组如果不会用循环,就单独用5次就行了.如下:PublicSubsjs()'以下第一组DimaAsRange,a1AsRangeSeta=Range("a1:a10")a.Cl

蓍草法:1:先找50跟短木棍(应该是蓍草现在蓍草不大好找所以我说木棍)50是“大衍之数”,算之前,先拿给被算的人,让他默念要求得事物.2:然后拿出一根,放在一边(A),只用七七49根来算.一卦共分六爻

你的n在方程中的什么位置?再问：就是7对方程的解，从小到大排列的7对解再答：你把这7对方程全列出来我看看

用assume函数假定为整数,可以算整数的东西.不过不定方程都是要自己编程解的,这个问题本身没有一般有效的方法,maple只能直接计算一些特殊的方程,如整数线性规划问题、Pell方程等.

在按sin或cos或tan键前必须按第二功能选择键（shift+sin,可得其-1次方）；按sin键后显示得到的是这个锐角的度数,必须按方法逐一把度数的小数部分化为分,再把分的小数部分化为秒,(可以按

把两个相等的三角形拼成一个与三角形等底等高的平行四边形,平行四边形的面积用底乘高求出来,三角形的面积就是平行四边形的一半.

这个题目要求出并记录所有组合,所以for循环是省不了的,但是可以做到不无脑.首先分析一下题目,设取出的N个数和为y,那么可以得出：y的最大值为i+(i-1)+(i-2)+···+(i-N+1)进行检定

这是求不出来的,你想想看,A（-1,0）,B（3,0）,说明对称轴x=1,在x=1,并经过A、B两点的是不是有无数个点呢?而a是确定它形状的,但它却有无数的形状. 我想楼主,你要有3个点才能

Subaaa()DimssAsRange,aAsOLEObjectFori=1To10Setss=Range("A"&i)Seta=ActiveSheet.OLEObjects.Add(ClassTy