【每日一题】冗余编译器 - 2022.5.2 _ 按键精灵脚本教程

查看: 3919\|回复: 4	[神梦] 【每日一题】冗余编译器 - 2022.5.2 [复制链接]

神梦科技

神梦无痕

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

1^#

字体大小: t T

发表于 2022-05-02 14:28 | |只看楼主

题目描述

给定一个字符串，请编写一个函数，检测其中的字符，
如果只出现1次则编译成"("，如果出现多次则编译成")"。
忽略字母的大小写。

示例
输入：“SMWH”，输出：“((((”
输入：“Success”：，输出：“)())())”

题目难度：中等
题目来源：codewars: Duplicate Encoder
题目交流： 584781753

Import "SmAssert.dll"
Function 冗余编译器(字符串)
// 您的代码写在这里
End Function
SmAssert 冗余编译器("SMWH") = "(((("
SmAssert 冗余编译器("Success") = ")())())"
SmAssert 冗余编译器("(( @") = "))(("

复制代码

参考题解

Import "SmAssert.dll"
Function 冗余编译器(字符串)
'【作者】：神梦无痕
'【ＱＱ】：1042207232
'【Ｑ群】：584781753
Dim 返回值, 字符, 次数
Dim i
字符串 = UCase(字符串)
For i = 1 To Len(字符串)
字符 = Mid(字符串, i, 1)
次数 = Len(字符串) - Len(Replace(字符串, 字符, ""))
If 次数 = 1 Then
返回值 = 返回值 & "("
Else
返回值 = 返回值 & ")"
End If
Next
冗余编译器 = 返回值
End Function
SmAssert 冗余编译器("SMWH") = "(((("
SmAssert 冗余编译器("Success") = ")())())"
SmAssert 冗余编译器("(( @") = "))(("

复制代码

插件下载

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

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

回顶部

发送短消息 UID 8723505 帖子 5 精华 0 鲜花 5 朵铜币 6 个银币 6 个性别在线时间 0 注册时间 2022-05-02 最后登录 2022-05-02 查看公共资料搜索主题搜索帖子 askoman19 组别小学一年级 UID8723505 帖子5 精华0 鲜花5 朵铜币6 个银币6 个在线时间0 注册时间2022-05-02	2^# 字体大小: t T 发表于 2022-05-02 15:07 \| \|只看该用户学习一下


	回顶部

发送短消息 UID 552797 帖子 847 精华 0 鲜花 -67 朵铜币 1035 个银币 -23 个性别在线时间 19180 注册时间 2010-12-04 最后登录 2022-07-19 1015213127 查看公共资料搜索主题搜索帖子 clboy520 clboy520 组别大学一年级 UID552797 帖子847 精华0 鲜花-67 朵铜币1035 个银币-23 个在线时间19180 注册时间2010-12-04 按键精灵开发者2级可通过提升认证等级来升级勋章：rz.anjian.com	3^# 字体大小: t T 发表于 2022-05-02 15:49 \| \|只看该用户 222222222222


	回顶部

发送短消息 UID 8221180 帖子 74 精华 0 鲜花 32 朵铜币 82 个银币 72 个性别在线时间 0 注册时间 2021-03-24 最后登录 2024-10-12 1951651981 查看公共资料搜索主题搜索帖子 px19960820 px19960820 组别小学四年级 UID8221180 帖子74 精华0 鲜花32 朵铜币82 个银币72 个在线时间0 注册时间2021-03-24	4^# 字体大小: t T 发表于 2022-05-02 16:57 \| \|只看该用户 6666666666666666


	回顶部

发送短消息 UID 3328028 帖子 1497 精华 0 鲜花 199 朵铜币 3957 个银币 204 个性别在线时间 26840 注册时间 2015-06-28 最后登录 2024-03-09 查看公共资料搜索主题搜索帖子 zjcyjj zjcyjj 组别大学三年级 UID3328028 帖子1497 精华0 鲜花199 朵铜币3957 个银币204 个在线时间26840 注册时间2015-06-28 小红帽对论坛提出良好建议（可向管理员申请）	5^# 字体大小: t T 发表于 2022-05-03 23:12 \| \|只看该用户用VBS来迂回实现


	回顶部

上一主题| 下一主题

[神梦] 【每日一题】冗余编译器 - 2022.5.2 [复制链接]