VB题目求解 题目:给出两个正整数,求他们的最大公约数和最小公倍数. 这个怎么做的
人气:222 ℃ 时间:2020-09-20 20:36:40
解答
Private Sub Command1_Click() Dim k%,a%,b%,c%a = Val(Text1)b = Val(Text2)If (a Mod 2 = 0) And (b Mod 2 = 0) Thena = a \ 2b = b \ 2k = 2Elsek = 1End IfIf a < b Thent = aa = bb = tEnd IfDoc = a - bIf c >...
推荐
猜你喜欢
- 抄写古诗词
- 我记得拿了通知书以后发了一张纸,
- 已知a,b,c是△ABC的三边长,满足a^2+b^2=10a+8b-41,且c是△ABC中最长的边,求c的取值范围.
- 星期六聪聪一家步行去公园,前五分钟所行路程与未行路程的比是1:5,又行了125米后,这时所行路程与未行路程的
- 十二生肖的动物里面那个动物爱干净
- 在数轴上,若点A和点B分别表示互为相反数的两个数,点A在点B的左侧,并且这两个数的距离是12.8,则A=_,B=_.
- 初一数学书(人民教育版)上册P102的7答案(写过程)
- 两磁铁各放在一辆小车上,小车能在水平面上无摩擦地沿同一直线运动,已知甲车和磁铁的总质量为0.5kg,乙车