应《网络安全法》要求，自2017年10月1日起，未进行实名认证将不得使用互联网跟帖服务。为保障您的帐号能够正常使用，请尽快对帐号进行手机号验证，感谢您的理解与支持！

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » Euler 工程 第四十二题: 三角词
51/1返回列表
查看: 970  |  回复: 4
只看楼主 @他人 存档 新回复提醒 (忽略) 收藏    在APP中查看

holmescn

金虫 (正式写手)

[交流] Euler 工程 第四十二题: 三角词 已有2人参与

希望在放假回家前,能完成前50个题

所谓三角数, 其通项为:t(n) = n(n+1)/2, 前10个三角数:
1, 3, 6, 10, 15, 21, 28, 36, 45, 55, .....

如果把一个单词各个字母的值(A~1, Z~26)相加作为这个单词的值, 比如SKY --> 19 + 11 + 26 = 55 = t(10)
如果一个单词的值是一个三角数,那么这个单词就叫一个三角词. 下面这个连接的文件中有将近2000个常用英语单词,
它们中有多少个三角词呢?

wordliist.txt
回复此楼

» 猜你喜欢
1楼 2011-07-14 17:23:13
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)
★ ★ ★
jjdg(金币+3): 辛苦了 2011-07-14 20:11:03
python:
CODE:
# Project Euler Problem 42
#
# Read Words
#

from math import sqrt

f = open("words.txt", "r")
words = [eval(s) for s in f.readline().split(",")]
f.close()
wordsVals = [sum([ord(c)-ord('A')+1 for c in s]) for s in words]

c = 0
for x in wordsVals:
    n = 1 + 8*x
    if int(sqrt(n))**2 == n:
        c += 1
print c

Result: 162
Elapsed Time: 0.058s
赞一下(1人) 回复此楼
2楼2011-07-14 17:53:07
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

holmescn

金虫 (正式写手)
★
jjdg(金币+1): 感谢参与 2011-07-14 20:10:51
这样一个题,用python写需要30分钟啊. 看来我水平真不行啊.
赞一下(1人) 回复此楼
3楼2011-07-14 17:54:15
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

libralibra

至尊木虫 (著名写手)

骠骑将军
★ ★ ★
小木虫(金币+0.5):给个红包，谢谢回帖
jjdg(金币+2): 感谢参与 2011-07-14 20:10:39
matlab的
CODE:
% Elapsed time is 0.214204 seconds.
% ans =
%    162
function result = euler42()
tic;
fid = fopen('D:\back\test\euler\words.txt');
words = fgets(fid);
fclose(fid);
words = strrep(words,'"','');
wordlist = regexp(words,',','split');
result = 0;
% words with 20 letters is not common, if all 'z',
% 20*26=520,40*41/2 must be over 520,so make trilist first
triList = (1:40).*(2:41)/2;
for i=1:length(wordlist)
    if ismember(sum((lower(wordlist{i})-repmat('a',1,length(wordlist{i})))+1),triList)
        result = result+1;
    end
end
toc;
end
赞一下(2人) 回复此楼
matlab/VB/python/c++/Java写程序请发QQ邮件:790404545@qq.com
4楼2011-07-14 19:20:49
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖

tieer

木虫 (正式写手)
★
小木虫(金币+0.5):给个红包，谢谢回帖
呵呵，这种题还真让数学分析束手无策啊
赞一下(1人) 回复此楼
思考，让这个世界更有趣。
5楼2011-07-15 09:04:56
已阅   回复此楼   关注TA 给TA发消息 送TA红花 TA的回帖
相关版块跳转 我要订阅楼主 holmescn 的主题更新
51/1返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 346求调剂[0856] +4 WayneLim327 2026-03-16 7/350 2026-03-21 04:02 by JourneyLucky
[考研] 265求调剂 +3 Jack?k?y 2026-03-17 3/150 2026-03-21 03:17 by JourneyLucky
[考研] 北科281学硕材料求调剂 +5 tcxiaoxx 2026-03-20 5/250 2026-03-20 21:35 by laoshidan
[考研] 0817 化学工程 299分求调剂 有科研经历 有二区文章 +22 rare12345 2026-03-18 22/1100 2026-03-20 20:39 by zhukairuo
[考研] 求调剂 +3 eation27 2026-03-20 3/150 2026-03-20 19:32 by JourneyLucky
[考研] 281求调剂（0805） +14 烟汐忆海 2026-03-16 25/1250 2026-03-20 15:47 by yuncha
[考研] 298-一志愿中国农业大学-求调剂 +9 手机用户 2026-03-17 9/450 2026-03-20 14:24 by 无懈可击111
[考博] 招收博士1-2人 +3 QGZDSYS 2026-03-18 3/150 2026-03-20 11:58 by 呱呱呱呱叫
[考研] 复试调剂 +4 z1z2z3879 2026-03-14 6/300 2026-03-19 17:18 by fei626-918
[考研] 0703化学调剂 +4 18889395102 2026-03-18 4/200 2026-03-19 16:13 by 30660438
[考研] 一志愿西安交通大学材料工程专业 282分求调剂 +5 枫桥ZL 2026-03-18 7/350 2026-03-19 14:52 by 功夫疯狂
[考研] 085600材料与化工调剂 324分 +10 llllkkkhh 2026-03-18 12/600 2026-03-19 14:33 by llllkkkhh
[考研] 311求调剂 +6 26研0 2026-03-15 6/300 2026-03-18 14:43 by haxia
[考研] 0854可跨调剂，一作一项核心论文五项专利，省、国级证书40+数一英一287 +8 小李0854 2026-03-16 8/400 2026-03-18 14:35 by 搏击518
[考研] 0854，计算机类招收调剂 +3 胡辣汤放糖 2026-03-15 6/300 2026-03-18 12:09 by 上岸上岸……..
[考研] 0703化学调剂 +3 妮妮ninicgb 2026-03-17 3/150 2026-03-18 10:29 by macy2011
[考研] 材料工程专硕274一志愿211求调剂 +6 薛云鹏 2026-03-15 6/300 2026-03-17 11:05 by 学员h26Tkc
[考研] 304求调剂 +5 素年祭语 2026-03-15 5/250 2026-03-16 17:00 by 我的船我的海
[考研] 326求调剂 +3 mlpqaz03 2026-03-15 3/150 2026-03-16 07:33 by Iveryant
[考研] 288求调剂 +4 奇点0314 2026-03-14 4/200 2026-03-14 23:04 by JourneyLucky
信息提示
关闭
请填处理意见
关闭