【字符串处理】【模拟】NBA工资

NBA工资

 (NBA.pas/c/cpp)

 

【问题描述】

 

NBA为了控制球员工资的总额，推出了奢侈税制度。

NBA球队的工资总额一旦超过奢侈税起征点，超出的部分就将按1比1征税。也就是说每超出1美元，就要支付给联盟1美元。比如说起征点是6000万美元，而球队的工资总额是7000万美元，那么球队在工资上将要花费8000万美元。

球队老板为了在新赛季中进行球员交易，因此需要得知球队当前的阵容在下个赛季需要花费多少的工资（包括奢侈税）。

请你根据当前球队的工资表来计算如果使用当前球员，那么这个赛季将花费多少钱。

 

【输入文件】

 

输入文件NBA.in，第一行是一个整数，表示奢侈税起征点，第二行是球队的名字，第三行是一个整数n，表示这只球队有n（8<=n<=18）名球员，以下n行，每行包括球员的名字和工资，用空格分开，球员的名字又两个单词组成，分别表示名和姓，中间用空格分开。工资是一个不超过4000万的整数。

 

【输出文件】

 

输出文件NBA.out包括一行，这一行只包含一个整数，为这个赛季将花费的工资。

 

【样例输入1】

 

61700000

Houston

15

Tracy McGrady 15694250

Juwan Howard 5900400

Dikembe Mutombo 5811043

YaoMing 5594906

Stromile Swift 5000000

David Wesley 4950000

Moochie Norris 4200000

Vin Baker 3850000

Bob Sura 3520000

Mike James 3300000

Charlie Ward 1873300

Jon Barry 1800000

Luther Head 975600

Ryan Bowen 900498

Toraye Braggs 719373

【样例输出1】

 

66478740

 

 

【样例输入2】

 

61700001

CHICAGO     

16

Antonio Davis 13925000

Tyson Chandler 11375000

Eddy Curry 11375000

Ben Gordon 3610200

Eric Piatkowski 2833333

Andres Nocioni 2805000

Chris Duhon 2799383

Kirk Hinrich 2513880

Luol Deng 2443920

Jannero Pargo 895248

Eddie Basden 398762

Othella Harrington 6300000

Frank Williams 1724441

LawrenceFunderburke 1029873

Adrian Griffin 965185

Jared Reiner 641748

 

【样例输出2】

 

69571945

 

这一题无算法可言，完全是送分的

Pascal Code

program NBA;var  max,sum:int64;procedure init;begin  assign(input,'NBA.in');  assign(output,'NBA.out');  reset(input);  rewrite(output);end;procedure outit;begin  close(input);  close(output);  halt;end;procedure readdata;var  s:ansistring;  ch:char;  m,i:longint;  a:int64;begin  readln(max);  readln(s);//队伍名称 无用...  read(m);  for i:=1 to m do  begin    read(ch);    while ch<>' ' do read(ch);//第一次遇到空格    read(ch);    while ch<>' ' do read(ch);//第二次遇到空格  剩下的为一个数字    read(a);    sum:=sum+a;    readln;  end;  if sum>max then sum:=sum+(sum-max);  writeln(sum);end;procedure main;beginend;begin  init;  readdata;  main;  outit;end.