版塊導航: 正在加載中...

客戶端APP下載

論文輔導

調(diào)劑小程序

登錄注冊

應《網(wǎng)絡安全法》要求，自2017年10月1日起，未進行實名認證將不得使用互聯(lián)網(wǎng)跟帖服務。為保障您的帳號能夠正常使用，請盡快對帳號進行手機號驗證，感謝您的理解與支持！

24小時熱門版塊排行榜

>論壇更新日志 (5774)
>考研 (2811)
>導師招生 (2612)
>文獻求助 (487)
>蟲友互識 (417)
>碩博家園 (264)
>考博 (169)
>招聘信息布告欄 (150)
>博后之家 (105)
>休閑灌水 (97)
>論文投稿 (87)
>綠色求助(高懸賞) (61)
>基金申請 (53)
>找工作 (48)
>藥學 (36)
>SciFinder/Reaxys (34)

北京石油化工學院2026年研究生招生接收調(diào)劑公告

返回列表

本帖產(chǎn)生 2 個程序強帖，點擊這里進行查看

當前只顯示滿足指定條件的回帖，點擊這里查看本話題的所有回帖

holmescn

金蟲 (正式寫手)

程序強帖: 37
應助: 1 (幼兒園)
金幣: 1918.8
散金: 275
紅花: 1
帖子: 699
在線: 102.6小時
蟲號: 913482
注冊: 2009-11-26
性別: GG
專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)

[交流] Euler 工程第廿二題: 姓的總分已有5人參與

附件中是一個包含了5前個姓的文件。先把它按字母表排序，然后計算每個姓的值，并乘以這個姓在文件中的序數(shù)得到這個姓的分數(shù)。
例如，COLIN，它的字母值是：3+15+12+9+14=53，在排序后的列表中，它在第938位，這樣COLIN的得分為：53*938=49714
那么這個文件中所有姓的總分是多少？

回復此樓

» 本帖已獲得的紅花（最新10朵）

holmescn

» 猜你喜歡

材料科學與工程求調(diào)劑已經(jīng)有13人回復
考研調(diào)劑已經(jīng)有3人回復
309求調(diào)劑已經(jīng)有17人回復
省雙一流重點一本大學招收調(diào)劑已經(jīng)有5人回復
復試調(diào)劑已經(jīng)有7人回復
267求調(diào)劑已經(jīng)有4人回復
359求調(diào)劑已經(jīng)有4人回復
一志愿北京科技大學材料學碩328分求調(diào)劑已經(jīng)有4人回復
08工科275分求調(diào)劑已經(jīng)有4人回復
309分085801求調(diào)劑已經(jīng)有3人回復

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

Project Euler 50 歐拉工程 50 題已經(jīng)有12人回復
Project Euler 48 歐拉工程 48 題已經(jīng)有30人回復
Project Euler 45 歐拉工程 45 題已經(jīng)有7人回復
Euler 工程第廿九題：有多少不同的項? 已經(jīng)有30人回復
Euler 工程第廿六題：最長的循環(huán)節(jié) 已經(jīng)有9人回復
Euler 工程第廿四題：全排列的第100萬項已經(jīng)有19人回復
Euler 工程第十六題：2的1000次方的各項和已經(jīng)有14人回復
Euler 工程第十五題：從左上角到右下角有多少條路？已經(jīng)有5人回復
Euler 工程第14題：找最長的數(shù)列已經(jīng)有9人回復
Euler Project Q13 歐拉工程第十三題已經(jīng)有20人回復
Euler Project Q12 歐拉工程第十二題已經(jīng)有23人回復
Euler 工程第十一題：相鄰元素乘積最大已經(jīng)有10人回復
Euler Project Q7. 歐拉工程第七題已經(jīng)有14人回復
Euler 工程第六題：平方和與和的平方差多少？已經(jīng)有5人回復
Euler 工程第二題：Fibonacci數(shù)列中小于4百萬的偶數(shù)的和已經(jīng)有8人回復

1樓 2011-06-05 00:28:39

已閱回復此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

huycwork

金蟲 (著名寫手)

程序強帖: 22
應助: 0 (幼兒園)
金幣: 953
散金: 663
紅花: 8
沙發(fā): 13
帖子: 1080
在線: 264.1小時
蟲號: 1257243
注冊: 2011-04-06
專業(yè): 金融學

★ ★ ★ ★ ★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
dubo(金幣+1): 謝謝交流 2011-06-05 12:17:28
微塵、夢想(金幣+4): 2011-06-06 20:19:54

涉及到文本處理的慣例是Perl：

CODE:

#!/usr/bin/perl

open F, "<", "names.txt";

$f = ;

@ns = sort eval ($f);

foreach(@ns){

    local (*v) = \$_;

    $v += ord($_) - ord('A') + 1 foreach(/(.)/g);

}

unshift @ns, 0;

$s += $_ * $ns[$_] foreach(1..@ns);

print $s;

[ Last edited by huycwork on 2011-6-6 at 09:27 ]

贊一下(3人)

回復此樓

漩渦的中心有一塊空地，空空的。

3樓2011-06-05 10:12:44

已閱回復此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

查看全部 14 個回答

libralibra

至尊木蟲 (著名寫手)

驃騎將軍

程序強帖: 40
應助: 817 (博后)
金幣: 12914.1
紅花: 64
帖子: 2238
在線: 287.3小時
蟲號: 696514
注冊: 2009-02-05
專業(yè): 計算機軟件

★ ★ ★ ★ ★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
dubo(金幣+1): 謝謝交流 2011-06-05 12:17:18
微塵、夢想(金幣+4): 2011-06-06 20:19:45

matlab code

CODE:

 %% What is the total of all the name scores in the file?

% For example, when the list is sorted into alphabetical order, 

% COLIN, which is worth 3 + 15 + 12 + 9 + 14 = 53, is the 938th name in the list. 

% So, COLIN would obtain a score of 938 × 53 = 49714.

function result = euler22()

tic;

fid = fopen('D:\euler\names.txt');

names = fgets(fid); % 讀取全部內(nèi)容到字符串

fclose(fid);

names = strrep(names,'"',''); % 刪除"

namelist = regexp(names,',','split'); % 用逗號分隔

sname = sort(namelist); % 排序

result = 0;

for i=1:length(sname) % 循環(huán)

    curname = lower(sname{i}); % 全小寫

    curname = curname-repmat('a',1,length(curname)); % 與全a作差

    cursum = sum(curname+1); % 求和

    result = result+cursum*i; % 乘順序計算score,累加

end

toc;

end

結(jié)果時間

CODE:

 % Elapsed time is 0.307340 seconds.

% ans =

%    871198282

贊一下(3人)

回復此樓

matlab/VB/python/c++/Java寫程序請發(fā)QQ郵件:790404545@qq.com

2樓2011-06-05 01:32:32

已閱回復此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

wangww2011

木蟲 (著名寫手)

程序強帖: 13
應助: 11 (小學生)
金幣: 4023.1
散金: 2709
紅花: 18
沙發(fā): 1
帖子: 1915
在線: 1537.1小時
蟲號: 772953
注冊: 2009-05-17
性別: GG
專業(yè): 凝聚態(tài)物性 II ：電子結(jié)構(gòu)

★ ★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
xzhdty(金幣+2): 謝謝交流 2011-06-05 14:21:41
余澤成(程序強帖+1): 鼓勵交流！ 2011-06-18 15:55:16

話說perl版的真是簡潔
還是用C寫吧，雖然看著挺不爽的

CODE:

#include

#include

#include

#define SIZE 50000

inline int cmp(const void *p1,const void *p2)

{

        return strcmp((char *)p1,(char *)p2);

}

inline int count(const char *p){

        int i=0,res=0;

        while(p[i]!='\0')res+=p[i++]-64;

        return res;

}

long euler22(){

        int i=0,length;

        FILE *fp=fopen("names.txt", "r");

        if(fp == 0) return -1;

        char str[SIZE];

        if (NULL == fgets(str, SIZE, fp)) {

                return -1;

        }

        fclose(fp);

        char *delims="\",";

        char *p=strtok(str,delims);

        char names[6000][15];

        while(p!=NULL){

                strcpy(names[i++],p);

                p=strtok(NULL,delims);

        }

        length=i;

        qsort(names,length,sizeof(names[0]),cmp);

        long  sum=0;

        for(i=0;i
                sum+=(i+1)*count(names[i]);

        return sum;

}

int main(void){

        printf("%ld\n",euler22());

        return 0;

}

贊一下(3人)

回復此樓

4樓2011-06-05 13:42:07

已閱回復此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

libralibra

至尊木蟲 (著名寫手)

驃騎將軍

程序強帖: 40
應助: 817 (博后)
金幣: 12914.1
紅花: 64
帖子: 2238
在線: 287.3小時
蟲號: 696514
注冊: 2009-02-05
專業(yè): 計算機軟件

★ ★
小木蟲(金幣+0.5):給個紅包，謝謝回帖
jjdg(金幣+1): 端午節(jié)快樂 2011-06-06 03:21:53

上python

CODE:

#! usr/bin/env python

import string

s = open('names.txt').read()[1:-1].split('","')

s.sort()

print sum([(i+1)*sum([string.ascii_uppercase.index(c)+1 for c in s[i]]) for i in xrange(len(s))])

贊一下(2人)

回復此樓

matlab/VB/python/c++/Java寫程序請發(fā)QQ郵件:790404545@qq.com

5樓2011-06-05 17:24:10

已閱回復此樓關(guān)注TA 給TA發(fā)消息送TA紅花 TA的回帖

查看全部 14 個回答

普通表情龍兔虎貓高級回復 (可上傳附件)

最具人氣熱帖推薦 [查看全部]		作者	回/看	最后發(fā)表

[考研] 359求調(diào)劑 +4	鄧鄧鄧書書 2026-03-25	4/200	2026-03-31 19:46 by 記事本2026
[考研] 324分 085600材料與化工 +6	呆鵝oor 2026-03-27	6/300	2026-03-31 19:03 by xixiangyue6220
[考研] 085600 一志愿9 總分351 求調(diào)劑學校 +7	czhcz 2026-03-31	7/350	2026-03-31 18:54 by 小張做實驗
[考研] 299求調(diào)劑 +8	嗯嗯嗯嗯2 2026-03-27	8/400	2026-03-31 18:23 by lizhi8172
[考研] 本科211生物醫(yī)學工程085409求調(diào)劑339分 +7	里子木yy 2026-03-29	7/350	2026-03-31 14:35 by fmesaito
[考研] 總分322求生物學/生化與分子/生物信息學相關(guān)調(diào)劑 +6	星沉uu 2026-03-26	7/350	2026-03-31 10:19 by GdShizy
[考研] 求調(diào)劑 +4	研s. 2026-03-25	4/200	2026-03-31 10:05 by fmesaito
[考研] 274求調(diào)劑 +6	xiao愛同學 2026-03-30	6/300	2026-03-31 10:04 by cal0306
[考研] 求調(diào)劑 +10	家佳佳佳佳佳 2026-03-29	10/500	2026-03-30 18:34 by 544594351
[考研] 071010 323 分求調(diào)劑 +3	Baekzhy 2026-03-27	3/150	2026-03-30 14:24 by andresqi
[考研] 311求調(diào)劑 +10	lin0039 2026-03-26	10/500	2026-03-30 10:26 by herarysara
[考研] 337求調(diào)劑 +6	《樹》 2026-03-29	6/300	2026-03-30 10:15 by herarysara
[考研] 349求調(diào)劑 +6	李木子啊哈哈 2026-03-25	6/300	2026-03-29 12:47 by 無際的草原
[考研] 070300求調(diào)劑306分 +4	26要上岸 2026-03-27	4/200	2026-03-28 13:06 by 唐沐兒
[考研] 308求調(diào)劑 +7	墨墨漠 2026-03-27	7/350	2026-03-28 07:43 by 熱情沙漠
[考研] 315分求調(diào)劑 +7	26考研上岸版26 2026-03-26	7/350	2026-03-28 04:05 by fmesaito
[考研] 一志愿西北大學總分282 英語一62 求調(diào)劑 +7	18419759900 2026-03-25	8/400	2026-03-27 16:38 by 18419759900
[考研] 315調(diào)劑 +4	0860求調(diào)劑 2026-03-26	5/250	2026-03-27 11:23 by wangjy2002
[考研] 341求調(diào)劑 +7	青檸檬1 2026-03-26	7/350	2026-03-27 00:19 by wxiongid
[考研] 一志愿天津大學339材料與化工求調(diào)劑 +3	江往賣魚 2026-03-26	3/150	2026-03-26 09:42 by 王小欠i

亭亭五月天在线观看,亭亭五月天在线观看,国产最新av一区二区,国产 高清 中文字幕,99re热久久亚洲综合精品成人,熟妇 一区二区三区,一级做a爰片性色毛片武则天,美女的骚穴视频播放,国产美女午夜免费视频

24小時熱門版塊排行榜

holmescn

[交流] Euler 工程 第廿二題: 姓的總分 已有5人參與

» 本帖已獲得的紅花（最新10朵）

» 猜你喜歡

» 本主題相關(guān)價值貼推薦，對您同樣有幫助:

huycwork

libralibra

wangww2011

libralibra

亭亭五月天在线观看,亭亭五月天在线观看,国产最新av一区二区,国产高清中文字幕,99re热久久亚洲综合精品成人,熟妇一区二区三区,一级做a爰片性色毛片武则天,美女的骚穴视频播放,国产美女午夜免费视频

[交流] Euler 工程第廿二題: 姓的總分已有5人參與

» 本主題相關(guān)價值貼推薦，對您同樣有幫助: