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

24小时热门版块排行榜    

小木虫论坛-学术科研互动平台 » 计算模拟区 » 程序语言 » 其它 » Euler 工程 第四十二题: 三角词
51/1返回列表
查看: 960  |  回复: 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返回列表
普通表情 龙 兔 虎 猫 高级回复 (可上传附件)
最具人气热帖推荐 [查看全部] 作者 回/看 最后发表
[考研] 化学工程321分求调剂 +7 大米饭！ 2026-03-15 7/350 2026-03-16 10:25 by 了了了了。。
[考研] 0703化学调剂 +4 妮妮ninicgb 2026-03-15 7/350 2026-03-16 09:43 by 闲人终南山
[考研] 085600材料与化工 求调剂 +12 enenenhui 2026-03-13 13/650 2026-03-16 08:30 by Linda Hu
[考研] 一志愿985，本科211，0817化学工程与技术319求调剂 +4 Liwangman 2026-03-15 4/200 2026-03-16 08:01 by wang_dand
[考研] 289求调剂 +5 步川酷紫123 2026-03-11 5/250 2026-03-15 00:45 by kruisytel
[考研] 材料工程327求调剂 +3 xiaohe12w 2026-03-11 3/150 2026-03-14 20:20 by ms629
[考研] 中科大材料专硕319求调剂 +3 孟鑫材料 2026-03-13 3/150 2026-03-14 18:10 by houyaoxu
[考研] 材料与化工（0856）304求B区调剂 +7 邱gl 2026-03-10 11/550 2026-03-14 12:18 by 邱gl
[考研] 332分材料工程调剂 +3 莓好时光海苔 2026-03-09 3/150 2026-03-14 02:03 by JourneyLucky
[考研] 求调剂 +6 yfihxh 2026-03-09 6/300 2026-03-14 01:18 by JourneyLucky
[考研] 0856材料与化工309分求调剂 +6 ZyZy…… 2026-03-10 6/300 2026-03-14 00:38 by JourneyLucky
[考研] 271求调剂 +10 生如夏花… 2026-03-11 10/500 2026-03-14 00:35 by 卖报员小雨
[考研] 材料工程,326分，求调剂 +6 KRSLSR 2026-03-10 6/300 2026-03-13 23:47 by JourneyLucky
[考研] 332求调剂 +3 zjy101327 2026-03-11 6/300 2026-03-13 22:48 by JourneyLucky
[考研] 308求调剂 +5 是Lupa啊 2026-03-11 5/250 2026-03-13 22:13 by JourneyLucky
[考研] 求材料调剂 +5 隔壁陈先生 2026-03-12 5/250 2026-03-13 22:03 by 星空星月
[考研] 材料与化工085600调剂求老师收留 +9 jiaanl 2026-03-11 9/450 2026-03-13 20:22 by JourneyLucky
[考研] 301求调剂 +6 Liyouyumairs 2026-03-11 6/300 2026-03-13 20:11 by JourneyLucky
[考研] 274求调剂0856材料化工 +12 z2839474511 2026-03-11 13/650 2026-03-13 10:39 by peike
[考研] 化工学硕306求调剂 +9 42838695 2026-03-12 9/450 2026-03-13 10:16 by houyaoxu
信息提示
关闭
请填处理意见
关闭