vb利用计算机 鸡兔同笼,VB程序题：利用计算机解决古代数学瓿“鸡兔同笼问题”。即已知在同一笼子里有总数为m只鸡和兔，鸡和兔的总脚数为n只，求鸡和兔各有多少只？ VB源码 龚沛曾...
VB程序题：利用计算机解决古代数学瓿“鸡兔同笼问题”。即已知在同一笼子里有总数为m只鸡和兔，鸡和兔的总脚数为n只，求鸡和兔各有多少只？ VB源码 龚沛曾
提示：
鸡、兔的通过输入的m，n，列出方程可解，但不要求出现荒唐的解，(如为负数，或者为半只鸡)。因此，在Text2_LostFocus事件中要考虑下面两个条件：
1.输入的总脚数n必须是偶数，否则提示数据错误的原因，要求重新输入数据。
2.若求出的只数为负数，提示数据错误的原因，要求重新输入数据。
解题：
先在窗体上画1个标签，它们的Caption属性设置为：输入总头数 输入总脚数 求得鸡数 求得兔数。
再画两个文本框，分别接受输入输入总头数和输入总脚数的数据，再画2个标签控件，label2 和 label3
代码如下：
Private Sub Text2_LostFocus()
If Text1 = "" Or Text2 = "" Then
MsgBox "请输入相关数据"
Exit Sub
End If
Dim M%, N%, y%
M = Val(Text1)
N = Val(Text2)
If N Mod 2 <> 0 Then
MsgBox ("脚数必定为偶数")
Text2 = ""
Text2.SetFocus
Else
y = N / 2 - M
If y < 0 Then
MsgBox ("脚数必须>=2倍的头数，请重新输入数据")
Text2 = ""
Text2.SetFocus
Else
y = N / 2 - M
Label2 = M - y
Label3 = y
End If
End If
If N > 4 * M Or N < 2 * M Then MsgBox ("出现了荒唐解，请重新输入数据")
End Sub
运行程序，分别在文本框输入总头数和总脚数，再用鼠标点击文本框1(或按Tab键),就会发生Text2_LostFocus事件，就会求出鸡数，兔数。
运行程序效果图如下：
Visual Basic程序设计教程(第3版) (龚沛曾等编)课后实验源码
来源：济亨网
vb利用计算机 鸡兔同笼,VB程序题：利用计算机解决古代数学瓿“鸡兔同笼问题”。即已知在同一笼子里有总数为m只鸡和兔，鸡和兔的总脚数为n只，求鸡和兔各有多少只？ VB源码 龚沛曾...相关推荐
- 鸡兔同笼。已知鸡兔总头数为h，总脚数为f，求鸡兔各有多少只？
鸡兔同笼.已知鸡兔总头数为h,总脚数为f,求鸡兔各有多少只? 题目:鸡兔同笼.已知鸡兔总头数为h,总脚数为f,求鸡兔各有多少只? 解法一:假设总头数h全部为鸡,程序如下: #include < ...
- 用vb编制一个计算机程序,VB程序题：编一模拟袖珍计算器的完整程序，界面如下图所示。要求：输入两个操作数和一个操作符，根据操作符决定所做的运算。 VB源码 龚沛曾...
VB程序题:编一模拟袖珍计算器的完整程序,界面如下图所示.要求:输入两个操作数和一个操作符,根据操作符决定所做的运算. VB源码 龚沛曾 提示: 1.为了程序运行正确,对存入操作符的文本框Text3, ...
- 在一个笼子里同事养着一些鸡和兔子,你想了解有多少只鸡和兔,主任对你说:我只告诉你鸡和兔的总头数是16和总脚数是40,你能不能自己计算有多少只鸡和多少只兔?
帮一个小妹妹解决了一个C语言的编程题,题目如下 在一个笼子里同事养着一些鸡和兔子,你想了解有多少只鸡和兔,主任对你说:我只告诉你鸡和兔的总头数是16和总脚数是40,你能不能自己计算有多少只鸡和多少只兔 ...
- 利用计算机解决古代数学问题鸡兔同笼,古代人是怎样解决“鸡兔同笼”得问提的?...
鸡兔同笼是我国古代著名趣题之一.大约在1500年前,<孙子算经>中就记载了这个有趣的问题.书中是这样叙述的:"今有雉兔同笼,上有三十五头,下有九十四足,问雉兔各几何?" ...
- 利用计算机解决古代数学问题鸡兔同笼,古代趣味数学：鸡兔同笼的4种算法，你都能看懂吗？...
鸡兔同笼是中国古代的数学名题之一,出自<孙子算经>.书中是这样叙述的:"今有雉兔同笼,上有三十五头,下有九十四足,问雉兔各几何?"这四句话的意思是:有若干只鸡兔同在一个 ...
- 利用计算机解决古代数学问题鸡兔同笼,古代数学-鸡兔同笼：7种解法，你发现了几种呢？...
鸡兔同笼问题是我国古代一道经典的数学趣题.它记载于大约1500年前的<孙子算经>中,书中是这样描述的:"今有雉兔同笼,上有三十五头,下有九十四足,问雉兔各几何?"这句话 ...
- c语言编程题 8.在一个笼子里同时养着一些鸡和兔子，你想了解有多少只鸡和多少只兔，主人对你说：我只告诉你鸡和兔的总头数是16和总脚数是40，你能不能自己计算有多少只鸡和多少只兔？
/*#include <stdio.h> int main() {int M,N,x,y;//x.y分别表示鸡.兔的头数,M.N分别表示总头数和总脚数M=16;N=40;x=(4M-N)/ ...
- 鸡和兔子若干只，头有35个，脚有94个，求兔子和鸭个多少只
package cn.coder.rabbitmq.test; import java.util.HashMap; import java.util.Map; public class Test { ...
- 已知鸡和兔的总数量n，总脚数为m。输入n和m，依次输出鸡和兔的数目。如果无解，输出“no answer”。 将下面的代码填写完整。
撰写人--软工二班--陈喜平 题目描述 已知鸡和兔的总数量n,总脚数为m.输入n和m,依次输出鸡和兔的数目.如果无解,输出"no answer". 将下面的代码填写完整. #inc ...
- 应用代码解决小学鸡兔同笼问题。（已知鸡和兔的总数量为n，总脚数为m。输入n和m，依次输出鸡和兔的数目。如果无解，则输出“no answer”。）
#include <stdio.h> int main() {int n, m, a = 0, b = 0;printf("请输入总数量:\n总脚数:\n");scan ...
最新文章
- python pandas inplace用法
- adjango 基本的使用
- 25 uname-用于显示系统信息
- 2010最后一篇：使用PyQt4开发的一个开源小程序QaoBa
- 如何把数据在A表空间里面，把它IMP进B表空间
- 分布式文件系统之Fastdfs是什么？
- XML 命名空间以及它们如何影响 XPath 和 XSLT (Extreme XML)
- 关于代码手写UI，xib和StoryBoard
- 红帽高级总监谈 OpenJDK 的未来：Java 的未来从未如此光明
- win7系统mysql连接不上数据库吗_Win7系统使用数据库时mysql频繁掉线无法连接的两种解决方法...
- Linux与Windows关于标准输入中涉及EOF的处理方式
- Javascript的原型链
- 02-Go语言数据类型与变量
- Atitit 理解参数 目录 1. 参数 1 1.1. 意义 1 1.2. 形式参数 实际参数 1 1.3. 默认参数 vs 必须参数 2 1.4. 位置参数，那么这个命名关键字参数 2 1.5. I
- 自适应滤波器3-最速下降算法
- Java项目：图书馆管理系统思路分析
- haproxy frontend 和backend
- 多益网络社招iq_18年多益秋招iq测试题
- 【Derivation】Nyquist采样定理
- 搜苹果ipad版_快速实现苹果企业签名，几分钟就可以？