【每日一题】9的时代 - 2022.6.29 _ 按键精灵脚本教程

查看: 2112\|回复: 0	[神梦] 【每日一题】9的时代 - 2022.6.29 [复制链接]

神梦科技

神梦无痕

组别按键认证大神
UID2699998
帖子3587
精华11
鲜花2173 朵
铜币7386 个
银币1021 个
在线时间91120
注册时间2014-08-23

1^#

字体大小: t T

发表于 2022-06-29 08:46 | |只看楼主

题目描述

今天的主角是数字9。给定一个正整数n，请编写一个函数，统计从数字1到n（包含）中出现了多少个9。例如99，919都算有2个9。

【示例】
输入：10
输出：1
解释：数字1到10中,只有数字9满足条件，所以算作1个。

题目难度：中等
题目来源：codewars - count '9’s from 1 to n
题目交流： 584781753

Import "SmAssert.dll"
Function 九的时代(数字)
// 您的代码写在这里
End Function
SmAssert 九的时代(8) = 0
SmAssert 九的时代(10) = 1
SmAssert 九的时代(100) = 20
SmAssert 九的时代(279) = 48
' 进阶
SmAssert 九的时代(99999) = 50000
SmAssert 九的时代(565754) = 275645

复制代码

参考题解

/*
总结规律，可以推断出：
个位：当为9时1个，其他0个
十位（10）: 1个
百位（100）: 20个
千位（1000）: 300个
万位（10000）: 4000个
*/
Import "SmAssert.dll"
Function 九的时代(数字)
'【作者】：神梦无痕
'【ＱＱ】：1042207232
'【Ｑ群】：584781753
Dim length, value
Dim b, k, d, m
' 目标数字长度
length = Len(数字)
' 递归结束
If length = 1 Then
If 数字 = 9 Then
九的时代 = 1
Else
九的时代 = 0
End If
Exit Function
End If
' 辅助数字
b = 10 ^ (length - 1)
k = (length - 1) * 10 ^ (length - 2)
' 商和余数
d = 数字 \ b
m = 数字 Mod b
' 递归计算对应数量
value = d * k + 九的时代(m)
If d = 9 Then
' 单独处理9开头的
value = value + m + 1
End If
九的时代 = value
End Function
SmAssert 九的时代(8) = 0
SmAssert 九的时代(10) = 1
SmAssert 九的时代(100) = 20
SmAssert 九的时代(279) = 48
' 进阶
SmAssert 九的时代(99999) = 50000
SmAssert 九的时代(565754) = 275645

复制代码

插件下载

【插件】神梦断言插件 SmAssert.dll，帮助开发者发现业务逻辑错误

游戏、办公、网页、脚本辅助定制
联系QQ: 1042207232
【命令库】利用IE+Chrome谷歌双核操纵网页填表，支持框架操作
【命令库】按键精灵也玩套接字(Sock)
SMWHff's Blog | 梦痕编程 - 神梦博客

回顶部

上一主题| 下一主题

[神梦] 【每日一题】9的时代 - 2022.6.29 [复制链接]