楼 主
[出题]计算指定十六进制数的二进制表示中包含1的个数
发表于 2008-11-13 00:20 · 中国 重庆 电信
版主
★★★★★
积分 9,023 发帖 5,017 注册 2007-05-31 19:39 19年会员 UID 89899 性别 男
状态 离线
当n=A时,{1010},包含数字1的个数为2;
当n=B时,{1011},包含数字1的个数为3;
当n=C时,{1100},包含数字1的个数为2;
当n=F时,{1111},包含数字1的个数为4;
当n=3B9AC9FF时,{1...1},包含数字1的个数为多少呢?
请给出速度最快的解。
第 2 楼
发表于 2008-11-13 02:21 · 中国 广东 广州 电信
高级用户
★★★
潜水修练批处理
积分 788 发帖 366 注册 2006-12-31 02:43 19年会员 UID 75048 性别 男
状态 离线
3B9AC9FF时是21
嗯,貌似即使用batch能处理的最大整数0x7FFFFFFF也能在瞬间搞定,比它快也貌似没有意义了-_-
@echo off
set /a rd=0x7FFFFFFF
:loop
set /a "rd1=rd%%2"
set /a "rd=rd/2"
if %rd1% equ 1 set /a n+=1
if %rd% neq 0 goto :loop
echo %n%
pause
[
Last edited by dikex on 2008-11-13 at 02:22 ]
本帖最近评分记录
(共 1 条)
点击查看详情
评分人 分数 时间
HAT
+2
2008-11-14 09:31
正在潜水修练的批处理小白
第 3 楼
发表于 2008-11-13 02:36 · 中国 广东 广州 电信
高级用户
★★★
潜水修练批处理
积分 788 发帖 366 注册 2006-12-31 02:43 19年会员 UID 75048 性别 男
状态 离线
哈哈,有空无事计算100次,得出计算100次平均用时是2.625s,也就是计算1次之用0.02625s
机子配置不同可能有差距
@echo off
echo %time%
:aa
call :cc
set /a c+=1
if %c% lss 100 goto :aa
echo %time%
pause
:cc
set /a rd=0x7FFFFFFF
set n=0
:loop
set /a "rd1=rd%%2"
set /a "rd=rd/2"
if %rd1% equ 1 set /a n+=1
if %rd% neq 0 goto :loop
goto :EOF
本帖最近评分记录
(共 1 条)
点击查看详情
评分人 分数 时间
HAT
+2
2008-11-14 09:31
正在潜水修练的批处理小白
第 4 楼
Re 2楼
发表于 2008-11-13 10:45 · 美国 惠普HP
版主
★★★★★
积分 9,023 发帖 5,017 注册 2007-05-31 19:39 19年会员 UID 89899 性别 男
状态 离线
这个方法在我的电脑上单次运行需要9毫秒左右
我有另外一个方案可以在1毫秒内给出结果
纯粹是为了好玩
呵呵
第 5 楼
发表于 2008-11-14 01:58 · 中国 广东 广州 天河区 电信
高级用户
★★★
潜水修练批处理
积分 788 发帖 366 注册 2006-12-31 02:43 19年会员 UID 75048 性别 男
状态 离线
洗澡时想到的算法^_^
比那个稍快
@echo off
echo %time%
:aa
call :cc
set /a c+=1
if %c% lss 100 goto :aa
echo %time%
pause
:cc
set /a a=0x7FFFFFFF
set n=0
set b=0
:loop
set /a "b+=(a>>%n%)&1"
set /a n+=1
if %n% lss 31 goto :loop
rem echo %b%
goto :EOF
本帖最近评分记录
(共 1 条)
点击查看详情
评分人 分数 时间
HAT
+2
2008-11-22 03:00
正在潜水修练的批处理小白
第 6 楼
发表于 2008-11-14 07:08 · 中国 广东 广州 天河区 电信
金牌会员
★★★★
一叶枝头,万树皆春
积分 2,564 发帖 1,127 注册 2006-12-25 22:57 19年会员 UID 74552 性别 男
状态 离线
这样?
Set /P "str=INPUT:"
Set /A "str=(str&0x55555555)+(str>>1&0x55555555)"
Set /A "str=(str&0x33333333)+(str>>2&0x33333333)"
Set /A "str=(str&0x0F0F0F0F)+(str>>4&0x0F0F0F0F)"
Set /A "str=(str&0x00FF00FF)+(str>>8&0x00FF00FF)"
Set /A "str=(str&0x0000FFFF)+(str>>16&0x0000FFFF)"
echo %str%
pause
[
Last edited by everest79 on 2008-11-15 at 01:26 ]
本帖最近评分记录
(共 1 条)
点击查看详情
评分人 分数 时间
HAT
+8
2008-11-22 03:04
49206C6F766520796F752067757973 54656C3A3133383238343036373837
第 7 楼
发表于 2008-11-21 23:24 · 中国 重庆 电信
版主
★★★★★
积分 9,023 发帖 5,017 注册 2007-05-31 19:39 19年会员 UID 89899 性别 男
状态 离线
@echo off
set hex=3B9AC9FF
set bin=%bin:3=11%
set bin=%bin:5=11%
set bin=%bin:6=11%
set bin=%bin:7=111%
set bin=%bin:9=11%
set bin=%bin:A=11%
set bin=%bin:B=111%
set bin=%bin:C=11%
set bin=%bin:D=111%
set bin=%bin:E=111%
set bin=%bin:F=1111%
set numOne=%bin:0=%
set "length=31"
:loop
set "numOne=%numOne%#"
set /a length-=1
if "%numOne:~30,1%" neq "#" goto :loop
echo %length%
pause
[
Last edited by HAT on 2008-11-22 at 02:58 ]
第 8 楼
发表于 2008-11-22 02:48 · 中国 江苏 常州 电信
银牌会员
★★★
积分 2,404 发帖 946 注册 2005-09-08 13:44 20年会员 UID 42345
状态 离线
这样可行否?
@echo off&setlocal enabledelayedexpansion
set 1=1&set 2=1&set 3=2&set 4=1&set 5=2&set 6=2&set 7=3&set 8=1
set 9=2&set a=2&set b=3&set c=2&set d=3&set e=3&set f=4
set hex=7FFFFFFF
:lp
if defined hex (
set/a n+=!%hex:~,1%!
set hex=%hex:~1%
goto lp
)
echo.%n%
pause
本帖最近评分记录
(共 1 条)
点击查看详情
评分人 分数 时间
HAT
+2
2008-11-22 02:59
简单!简单!再简单!
第 9 楼
我也来一个
发表于 2009-02-26 00:06 · 中国 广东 东莞 电信
银牌会员
★★★
批处理编程迷
积分 1,916 发帖 752 注册 2008-12-28 04:30 17年会员 UID 135147 性别 男 来自 广西
状态 离线
@echo off
set /a num=0x12345678
:loop
set /a n=num%%2,num=num/2
set /a _%n%+=1
if %num% gtr 0 goto :loop
echo 有%_0%个0
echo 有%_1%个1
pause
[ Last edited by netbenton on 2009-2-27 at 07:18 ]
论坛跳转:
— 请选择 —
站务公告 & 版主讨论
意见反馈 & 网友交流
DOS学习入门 & 精彩文章 (教学室)
DOS疑难解答 & 问题讨论 (解答室)
DOS启动盘 & LOGO技术 (启动盘室)
DOS批处理 & 脚本技术(批处理室)
DOS媒体世界 & 网络技术 (多媒体室)
DOS汉化世界 & 中文系统 (中文化室)
DOS开发编程 & 发展交流 (开发室)
DOS软件下载 & 游戏分享 (下载室)
GRUB4DOS、SYSLINUX及其它启动管理软件讨论专区
其它操作系统综合讨论区
WinPE、PowerShell及其它命令行系统专区
贴图灌水、文学娱乐专区
网络日志(Blog)
论坛回收站
├ 链接失效,待修正