飞翔的小鱼 - www.cp.ac.cn - 免费自动收录导航(ss1234.com)

飞翔的小鱼

站点编号：72186 所属分类：网络应用最后点入：2025-06-24 19:47:32 百度权重：

0 手机权重：

0 加入时间：2024-05-28 10:17:32 3 60权重：

0 搜狗权重：

0 浏览热度：次站点URL： http://www.cp.ac.cn 备案信息：- 备案名称：-

站点信息

关键词： (16个字符) typecho、 php、 blog、

描述： (14个字符) Goodlucktoyou!

关于www.cp.ac.cn说明：
www.cp.ac.cn由网友主动性提交被免费自动收录导航(ss1234.com)整理收录的，免费自动收录导航(ss1234.com)仅提供www.cp.ac.cn的基础信息并免费向大众网友展示，www.cp.ac.cn的是IP地址：- 地址：-，www.cp.ac.cn的百度权重为0、百度手机权重为0、百度收录为0条、360收录为0条、搜狗收录为0条、谷歌收录为0条、百度来访流量大约在-之间、百度手机端来访流量大约在-之间、www.cp.ac.cn的备案号是-、备案人叫-、被百度收录的关键词有0个、手机端关键词有0个、迄今为止已经创建未知。

下载地址： txt下载、docx下载、pdf下载、rar下载、zip下载

本页地址：https://www.ss1234.com/wangluodh/d3b28e9403dfa050fa3a.html

上一篇：扬州海通包装材料有限公司 | 下一篇：SIVIBRAND视维品牌营销策划设计 - 擅长品牌策划｜品牌全案｜品牌设计｜超级IP设计｜SI设计｜设计公司

SEO综合查询信息

SEO信息	百度来访IP：- \| 移动端来访IP：- \| 出站链接：0 \| 站内链接：0
IP网速：	IP地址：- 地址：- \| 网速：615毫秒
ALEXA排名	世界排名：- \| 预估IP：- \| 预估PV：-
备案信息	- \| 名称：- \| 已创建：未知

收录	百度	360	搜狗	谷歌
查询	0	0	0	0

电脑关键词	手机关键词	页面友好	首页位置	索引	近期收录
0	0	电脑端优秀	-	0	0

服务器信息协议类型 - 页面类型 - 服务器类型 - 程序支持 - 连接标识 - 消息发送 - GZIP检测 - 源文件大小 - 压缩后大小 - 压缩率 -

网站快照

        飞 翔 的 小 鱼 飞 翔 的 小 鱼 G o o d l u c k t o y o u ! 搜 索 关 键 字 搜 索 首 页 V i s u a l B a s i c 习 题 1 0 作 者 : b e y o n d 时 间 : 2 0 2 4 0 5 3 0 分 类 : 文 章 4 1 、 编 写 函 数 f u n ， 函 数 的 功 能 是 ： 求 一 个 四 位 数 的 各 位 数 字 的 立 方 之 和 。 
 P r i v a t e F u n c t i o n f u n S t r i n g ( 5 , * ) N e x t i E n d S u b P r i v a t e S u b C o m m a n d 3 _ C l i c k ( ) 左 直 角 三 角 形 P i c t u r e 3 . C l s D i m i % F o r i = 1 T o 5 P i c t u r e 3 . P r i n t S t r i n g ( i , * ) N e x t i E n d S u b P r i v a t e S u b C o m m a n d 4 _ C l i c k ( ) 右 直 角 三 角 形 P i c t u r e 4 . C l s D i m i % F o r i = 1 T o 5 P i c t u r e 4 . P r i n t T a b ( 6 i ) ; S t r i n g ( i , * ) N e x t i E n d S u b P r i v a t e S u b C o m m a n d 5 _ C l i c k ( ) 等 腰 三 角 形 P i c t u r e 5 . C l s D i m i % F o r i = 1 T o 5 P i c t u r e 5 . P r i n t T a b ( 6 i ) ; S t r i n g ( 2 i 1 , ) N e x t i E n d S u b P r i v a t e S u b C o m m a n d 6 _ C l i c k ( ) 倒 立 等 腰 三 角 形 P i c t u r e 6 . C l s D i m i % F o r i = 1 T o 5 P i c t u r e 6 . P r i n t T a b ( i ) ; S t r i n g ( 1 1 2 i , ) N e x t i E n d S u b P r i v a t e S u b C o m m a n d 7 _ C l i c k ( ) 菱 形 P i c t u r e 7 . C l s D i m i % F o r i = 1 T o 5 P i c t u r e 7 . P r i n t T a b ( 6 i ) ; S t r i n g ( 2 i 1 , ) N e x t i D i m j % F o r j = 1 T o 4 P i c t u r e 7 . P r i n t T a b ( j + 1 ) ; S t r i n g ( 9 2 j , ) N e x t j E n d S u b V i s u a l B a s i c 习 题 9 作 者 : b e y o n d 时 间 : 2 0 2 4 0 5 3 0 分 类 : 文 章 E n d F u n c t i o n P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) S h o w P r i n t f u n ( 8 5 5 ) E n d S u b 4 0 、 编 写 函 数 f u n 其 功 能 是 ： 判 断 一 个 整 数 w 的 各 位 数 字 平 方 之 和 能 否 被 5 整 除 ， 可 以 被 5 整 除 则 返 回 t r u e ， 否 则 返 回 f a l s e 。 
 P r i v a t e F u n c t i o n f u n ( w % ) A s B o o l e a n D i m x % , m % D o W h i l e w 0 x = w M o d 1 0 m = m + x ^ 2 w = w \ \ 1 0 L o o p I f m M o d 5 = 0 T h e n f u n = T r u e E l s e f u n = F a l s e E n d I f E n d F u n c t i o n P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) S h o w P r i n t f u n ( 5 0 ) E n d S u b V i s u a l B a s i c 习 题 8 作 者 : b e y o n d 时 间 : 2 0 2 4 0 5 3 0 分 类 : 文 章 3 1 、 求 斐 波 那 契 数 列 的 第 2 0 项 。 
 第 1 、 2 项 为 0 、 1 ， 从 第 3 项 开 始 ， 每 一 项 等 于 其 前 两 项 的 和 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m f 1 % , f 2 % , f 3 % f 1 = 0 f 2 = 1 F o r i = 3 T o 2 0 f 3 = f 1 + f 2 f 1 = f 2 f 2 = f 3 N e x t i P r i n t f 3 = & f 3 E n d S u b 3 2 、 在 窗 体 上 打 印 数 列 2 / 1 , 3 / 2 , 5 / 3 , 8 / 5 , 1 3 / 8 … 的 前 1 0 项 ， 并 求 其 和 . P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m f 1 % , f 2 % , f 3 % , s u m ! f 1 = 1 f 2 = 2 s u m = f 2 / f 1 P r i n t f 2 & / & f 1 F o r i = 3 T o 1 1 f 3 = f 1 + f 2 P r i n t f 3 & / & f 2 s u m = s u m + f 3 / f 2 f 1 = f 2 f 2 = f 3 N e x t i P r i n t s u m = & s u m E n d S u b 3 3 、 求 数 列 1 + 3 + 3 + 9 + 2 7 + … … 前 6 项 的 和 ， 并 将 结 果 输 出 到 窗 体 上 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m f 1 % , f 2 % , f 3 % , s u m ! f 1 = 1 f 2 = 3 s u m = 4 F o r i = 3 T o 6 f 3 = f 1 * f 2 f 1 = f 2 f 2 = f 3 s u m = s u m + f 3 N e x t i P r i n t s u m = & s u m E n d S u b 3 4 、 一 球 从 1 0 0 米 高 度 自 由 落 下 ， 每 次 落 地 返 回 原 高 度 的 一 半 ， 求 第 1 0 次 落 地 时 ， 共 经 过 多 少 米 ？ 并 将 结 果 在 窗 体 上 输 出 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m h ! , s ! h = 1 0 0 s = 1 0 0 F o r i = 2 T o 1 0 h = h / 2 s = s + 2 * h N e x t i P r i n t s = & s E n d S u b 3 5 、 我 国 现 有 人 口 1 3 亿 ， 设 人 口 年 增 长 率 q 为 0 . 8 % ， 多 少 年 后 我 国 人 口 超 过 2 6 亿 ， 将 年 份 n 打 印 在 窗 体 上 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m m ! , n % , q ! m = 1 3 q = 0 . 8 D o m = ( 1 + q ) * m n = n + 1 L o o p U n t i l m > 2 6 P r i n t n = & n E n d S u b V i s u a l B a s i c 习 题 7 作 者 : b e y o n d 时 间 : 2 0 2 4 0 5 3 0 分 类 : 文 章 2 6 、 在 窗 体 上 输 出 1 0 0 ~ 2 0 0 之 间 的 所 有 合 数 。 
 求 出 所 有 数 之 和 存 入 S U M 中 。 
 合 数 ： 指 除 了 1 和 本 身 外 ， 还 能 被 其 他 数 整 除 的 数 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m i % , j % , s u m % F o r i = 1 0 0 T o 2 0 0 f l a g = 1 F o r j = 2 T o i 1 I f i M o d j = 0 T h e n f l a g = 0 E n d I f N e x t j I f f l a g = 0 T h e n P r i n t i s u m = s u m + i E n d I f N e x t i P r i n t s u m = & s u m E n d S u b 2 7 、 求 两 个 数 m , n 的 最 大 公 约 数 p 和 最 小 公 倍 数 q 方 法 一 ： P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m m % , n % , r % , p % , q % , a % , b % m = I n p u t B o x ( 请 输 入 一 个 正 整 数 m ) n = I n p u t B o x ( 请 输 入 一 个 正 整 数 n ) a = m b = n D o r = m M o d n m = n n = r L o o p U n t i l r = 0 p = m q = a * b / p P r i n t p = & p , q = & q E n d S u b 方 法 二 ： P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m m % , n % , r % , p % , q % , a % , b % m = I n p u t B o x ( 请 输 入 一 个 正 整 数 m ) n = I n p u t B o x ( 请 输 入 一 个 正 整 数 n ) a = m b = n r = m M o d n D o W h i l e r 0 m = n n = r r = m M o d n L o o p p = n q = a * b / p P r i n t p = & p , q = & q E n d S u b 2 8 、 求 出 1 0 0 0 9 9 9 9 之 间 具 有 如 下 特 点 的 四 位 数 字 ， 它 的 平 方 根 恰 好 就 是 它 中 间 的 两 位 数 字 ， 例 如 ， 2 5 0 0 开 平 方 为 5 0 ， 恰 为 2 5 0 0 的 中 间 两 位 ， 找 出 所 有 这 样 的 四 位 数 。 
 并 求 出 所 有 这 样 的 数 的 和 存 入 S U M 中 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m s u m % , i % F o r i = 1 0 0 0 T o 9 9 9 9 I f i ^ ( 1 / 2 ) = ( i \ \ 1 0 ) M o d 1 0 0 T h e n s u m = s u m + i P r i n t i E n d I f N e x t i P r i n t s u m = & s u m E n d S u b 2 9 、 求 [ 1 0 、 9 9 ] 之 间 满 足 下 列 条 件 的 所 有 数 据 的 个 数 ， 并 将 结 果 输 出 到 窗 体 上 。 
 条 件 为 ： 其 十 位 数 a 大 于 个 位 数 b ， 并 且 a + b 为 1 0 . P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m i % , a % , b % , n % F o r i = 1 0 T o 9 9 a = i \ \ 1 0 b = i M o d 1 0 I f a > b A n d a + b = 1 0 T h e n P r i n t i n = n + 1 E n d I f N e x t i P r i n t n = & n E n d S u b 3 0 、 求 1 + 2 + 3 + 5 + 8 + 1 3 + … … 前 2 0 项 的 和 ， 并 将 结 果 在 窗 体 上 输 出 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m f 1 % , f 2 % , f 3 % , s u m ! f 1 = 1 f 2 = 2 s u m = 3 F o r i = 3 T o 2 0 f 3 = f 1 + f 2 f 1 = f 2 f 2 = f 3 s u m = s u m + f 3 N e x t i P r i n t s u m = & s u m E n d S u b V i s u a l B a s i c 习 题 6 作 者 : b e y o n d 时 间 : 2 0 2 4 0 5 3 0 分 类 : 文 章 2 1 、 把 一 元 钞 票 换 成 一 分 、 二 分 和 五 分 的 硬 币 （ 每 种 至 少 有 一 枚 ） ， 求 出 其 所 有 的 换 法 ， 把 结 果 输 出 在 窗 体 上 ， 并 将 所 有 换 法 的 数 目 存 入 变 量 N 中 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m x % , y % , z % , N % F o r x = 1 T o 1 0 0 F o r y = 1 T o 5 0 F o r z = 1 T o 2 0 I f x + 2 * y + 5 * z = 1 0 0 T h e n P r i n t x , y , z N = N + 1 E n d I f N e x t z , y , x P r i n t N = & N E n d S u b 2 2 、 解 决 百 钱 买 百 鸡 问 题 ： 公 鸡 3 元 1 只 ， 母 鸡 5 元 1 只 ， 小 鸡 一 元 3 只 ， 怎 样 用 1 0 0 元 买 1 0 0 只 鸡 。 
 把 结 果 输 出 到 窗 体 上 ， 将 所 有 换 法 的 数 目 存 入 变 量 N 中 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m x % , y % , z % , N % P r i n t 公 鸡 , 母 鸡 , 小 鸡 F o r x = 1 T o 3 3 F o r y = 1 T o 2 0 z = 1 0 0 x y I f x + y + z = 1 0 0 A n d 3 * x + 5 * y + z / 3 = 1 0 0 T h e n N = N + 1 P r i n t x , y , z E n d I f N e x t y N e x t x P r i n t N = & N E n d S u b 2 3 、 将 一 张 面 值 为 1 0 0 元 的 人 民 币 等 值 换 成 1 0 0 张 5 元 、 1 元 和 0 . 5 元 的 零 钞 ， 要 求 每 种 零 钞 不 少 于 1 张 ， 问 有 哪 几 种 组 合 ？ 将 组 合 数 存 入 变 量 O U T 中 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m x % , y % , z % , o u t % P r i n t 5 元 , 1 元 , 0 . 5 元 F o r x = 1 T o 2 0 F o r y = 1 T o 1 0 0 F o r z = 1 T o 1 0 0 I f x + y + z = 1 0 0 A n d 5 * x + y + 0 . 5 * z = 1 0 0 T h e n o u t = o u t + 1 P r i n t x , y , z E n d I f N e x t z N e x t y N e x t x P r i n t o u t = & o u t E n d S u b 2 4 、 求 出 1 0 0 以 内 所 有 素 数 的 和 ， 并 将 结 果 输 出 到 窗 体 上 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m i % , j % , s % F o r i = 2 T o 1 0 0 f l a g = 1 F o r j = 2 T o i 1 I f i M o d j = 0 T h e n f l a g = 0 E n d I f N e x t j I f f l a g = 1 T h e n P r i n t i s = s + i E n d I f N e x t i P r i n t s = & s E n d S u b 2 5 、 求 1 0 ~ 2 0 之 间 所 有 素 数 的 乘 积 并 输 出 在 窗 体 上 。 
 P r i v a t e S u b C o m m a n d 1 _ C l i c k ( ) D i m i % , j % , s ! s = 1 F o r i = 1 0 T o 2 0 f l a g = 1 F o r j = 2 T o i 1 I f i M o d j = 0 T h e n f l a g = 0 E n d I f N e x t j I f f l a g = 1 T h e n P r i n t i s = s * i E n d I f N e x t i P r i n t s = & s E n d S u b 1 2 3 后 一 页 » 最 新 文 章 V i s u a l B a s i c 习 题 8 V i s u a l B a s i c 习 题 9 V i s u a l B a s i c 习 题 1 0 V i s u a l B a s i c 习 题 7 V i s u a l B a s i c 习 题 6 V i s u a l B a s i c 习 题 2 V i s u a l B a s i c 习 题 3 V i s u a l B a s i c 习 题 4 V i s u a l B a s i c 习 题 5 V i s u a l B a s i c 习 题 1 最 近 回 复 分 类 文 章 归 档 M a y 2 0 2 4 其 它 文 章 R S S T y p e c h o © 2 0 2 5 飞 翔 的 小 鱼 . 蜀 I C P 备 2 0 0 1 8 3 6 9 号 4 .

来此发表您的评论