VB题目求解 题目：给出两个正整数,求他们的最大公约数和最小公倍数. 这个怎么做的
题目
VB题目求解 题目：给出两个正整数,求他们的最大公约数和最小公倍数. 这个怎么做的
答案
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 >...
举一反三
我想写一篇关于奥巴马的演讲的文章,写哪一篇好呢?为什么好
最新试题
热门考点
- 质点从静止开始做匀加速运动,从开始运动起,通过连续三段路程所用的时间分别是1s 2s 3s 则这三段路程之比是
- 书店以每套50元的价钱卖出两套不同的书,一套赚了10%,一套亏本10%,总的来看书店是?
- 求不定积分,∫xsin²xdx.
- 大气对太阳辐射的削弱作用中，不具有选择性的是（ ） A.吸收作用 B.反射作用 C.散射作用 D.折射作用
- 请您用几何图形直观地解释（3b）²=9b²
- 用50本故事书能摆成一个长36厘米,宽26厘米,高50厘米的长方体,平均每本书的体积是多少?
- 英语宾语从句问题,
- 六水氯化镁摩尔计算公式与氧化镁摩尔计算公式
- "乐琴书以消忧"(陶渊明)中的"乐"读yào还是lè
- cos2α=-(sinα-cosα)(sinα+cosα)