为编程爱好者分享易语言教程源码的资源网
好用的代理IP,游戏必备 ____广告位招租____ 服务器99/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器
好用的代理IP,游戏必备 ____广告位招租____ 服务器低至38/年 ____广告位招租____ ____广告位招租____ 挂机,建站服务器

网站首页 > 脚本专栏 > 按键精灵相关 > 按键精灵Q语言 正文

百鸡百钱算法

三叶资源网 2018-10-01 10:59:05 按键精灵Q语言 1044 ℃ 0 评论

百鸡百钱算法

运行环境:分辨率:1440x900 色深:32位 操作系统:Microsoft Windows XP 按键精灵版本:7.20.5178

@按键小小生 2010/5/27

hen=0  
chicken=0  
n=0  
For 20  
    For 33  
        chicken=100-cock-hen  
        a=chicken Mod  2  
        b=cock*5+hen*3+chicken/2  
        If a=0 and b=100  
            n=n+1  
            text="第"&CStr(n)&"方案为:公鸡"&CStr(cock)&"只/母鸡"&CStr(hen)&"只/小鸡"&CStr(chicken)&"只"  
            VBSCall MessageBox(text)  
        EndIf   
        hen=hen+1  
    EndFor   
    hen=0  
    cock=cock+1  
EndFor   
VBSCall MessageBox("总共"&n&"种方案")



来源:三叶资源网,欢迎分享,公众号:iisanye,(三叶资源网⑤群:21414575

本文暂时没有评论,来添加一个吧(●'◡'●)

欢迎 发表评论:

百度站内搜索
关注微信公众号
三叶资源网⑤群:三叶资源网⑤群

网站分类
随机tag
薅羊毛算法笔记IP地址定位会员系统扫码枪控制托盘图标万能快递单打印http访问Unicode微信支付觅风易语言教程按键精灵安卓版PNG素材GDI图像处理打印窗口端口检测明朝时代页游脱机QQTEA加密算法贪玩蓝月答题小游戏源码
最新评论