1971 년 십 진화 까지 영국 돈은 파운드 를 240 동전으로 나누는 데 기초를 두었습니다 . 실링은 12 동전으로 20 실링은 파운드를 만들었습니다. 가장 작은 명칭은 1 페니의 1/4에 달하는 파싱이었다. 동전에 대한 많은 다른 명칭과 별명이 있었으며 , 시스템에 익숙하지 않으면 혼란 스러울 수 있습니다.

도전

오래된 영어 돈의 명칭을 다른 것으로 바꿀 수있는 프로그램이나 기능을 작성하십시오. 사용자가 더 쉽게 만들려면 복수와 닉네임을 지원해야합니다.

이것들은 당신이 지원해야 할 명칭과 동의어입니다. 편의를 위해 파열에 대한 가치는 각 라인을 이끈다.

1: farthing, farthings
2: halfpence, halfpenny, halfpennies
4: penny, pennies, pence, copper, coppers
8: twopenny, twopennies, twopence, tuppence, half groat, half groats
12: threepence, threepenny, threepennies, threepenny bit, threepenny bits, thruppence, thrupenny, thrupennies, thrupenny bit, thrupenny bits
16: groat, groats
24: sixpence, sixpenny, sixpennies, sixpenny bit, sixpenny bits, tanner, tanners
48: shilling, shillings, bob
96: florin, florins, two bob bit, two bob bits
120: half crown, half crowns
240: crown, crowns
480: half sovereign, half sovereigns
504: half guinea, half guineas
960: pound, pounds, pounds sterling, sovereign, sovereigns, quid, quids
1008: guinea, guineas

^{(나는 영국인이 아니며,이 목록은 결코 권위가 없지만 도전에 충분할 것입니다.)}

stdin 또는 함수 인수를 통해 양식의 문자열을 가져와야합니다.

[value to convert] [denomination 1] in [denomination 2]

반납 또는 인쇄

[value to convert] [denomination 1] is [converted value] [denomination 2]

곳 [converted value]이다 [value to convert]교단 하나의 단위 교단 2로 변환.

[value to convert]및 [converted value]긍정적 인 수레입니다. 출력에서 둘 다 소수점 이하 4 자리로 반올림되거나 잘 려야합니다. 원하는 [value to convert]경우 입력 할 때 항상 소수점이 있고 0 이 있다고 가정 할 수 있습니다 (예 : 1.0대신 1).

교단 1과 2는 위 목록에서 두 가지 용어 일 수 있습니다. 그들이 복수인지 아닌지에 대해 걱정하지 말고 모든 명칭과 동의어를 동일하게 취급하십시오. 입력 형식과 명칭이 항상 유효하다고 가정 할 수 있습니다.

예

1 pounds in shilling→ 1 pounds is 20 shilling
( 1.0000 pounds is 20.0000 shilling괜찮을 것이다)

0.6 tuppence in tanner → 0.6 tuppence is 0.2 tanner

24 two bob bits in pounds sterling → 24 two bob bits is 2.4 pounds sterling

144 threepennies in guineas → 144 threepennies is 1.7143 guineas

채점

바이트 단위 의 가장 짧은 코드 가 이깁니다.

피스 , 146 145

K4J24L?*y>b-5>b\t?2>b\t.5}<b2"hatw"@[1K8K12K16J48J1008*JT96*2J960)xc"fapetucothengrsishtagucrflbo"2<b2AGHcz" in"++G%" is %0.4f"*vhcGdcyjdtcGdytHH

더 읽기 쉬운 (줄 바꿈과 들여 쓰기를 제거하여 실행해야 함) :

K4J24
L?*y>b-5>b\t?2>b\t.5
  }<b2"hatw"
  @[1K8K12K16J48J1008*JT96*2J960)
   xc"fapetucothengrsishtagucrflbo"2<b2
AGHcz" in"
++G
  %" is %0.4f"
   *vhcGdcyjdtcGdytH
 H

업데이트 : 문자열 인덱스 작업을 실행하기 전에 문자열을 2 개의 문자열 목록으로 자르는 것이 1 자 더 짧습니다 (공간이 필요 없음). /x"string"<b2 2-> xc"string"2<b2. 다른 것은 바꿀 필요가 없습니다.

작동 방식 :

• 이것은 처음 두 글자를 사용하여 통화 가치를 찾는 @xnor의 접근 방식과 초기 값을 감지하는 트릭을 사용합니다. half 하거나 two, 그것을 제거하고 다시 함수를 호출합니다.

• 처음 두 문자의 값을 조회하기 위해 문자열에서 통화의 처음 두 문자의 위치를 ​​찾은 다음 2로 나누고 목록에서 해당 인덱스의 값을 가져옵니다. 이것은 pyth의 dict보다 훨씬 짧습니다.

• x(문자열 내에서 찾기) 문자열에 po(파운드) qu(quid) 또는 so(주권자) 를 두지 않는 데 실패하면 -1을 반환하고 기본적으로 목록의 마지막 요소 인 960을 반환 한다는 사실을 사용합니다 .

• 조회 시스템에서 통화의 순서를 재 배열 조심스럽게 초기화에 의해 K4하고 J24, 목록에서 번호를 구분하는 데 필요한했을 모든 공간을 제거 하였다.

• A입력 스플릿에서 pyth의 이중 할당 연산자를 사용합니다 . in 의 시작과 끝을 개별 변수로 가져옵니다.

• pyth에는 없어도 본질적으로 동일한 조회를 수행 .split(_,1)하므로 다소 성가시다.

예 :

$ pyth programs/currency.pyth <<< '5 florins in half guineas'
5 florins is 0.9524 half guineas

$ pyth programs/currency.pyth <<< '0.4 quid in sixpenny bits'
0.4 quid is 16.0000 sixpenny bits

루비 345 306 302 288 287 278 273 253 252 242 232 221 202 190 바이트

f=->s{" !#+/7OďǿȗϟЏ'"[%w{fa fp ^pe|co r..p ^gr x|ta sh|^b fl|b f.c ^c f.s .gu d|v ^g .}.index{|k|s[/#{k}/]}].ord-31}
$><<gets.sub(/ (.+ i)n /){" #{r=$1}s %0.4f ".%$`.to_f/f[$']*f[r]}

STDIN에서 입력을 가져 와서 STDOUT으로 인쇄합니다.

각 값에 대해 원하는 명칭 만 일치시키기 위해 짧은 정규식을 사용하고 있습니다. 해당 인덱스에 두 개의 배열 (정규식과 값이있는 배열)이 있습니다. 정규식 배열은 공백으로 구분 된 배열 리터럴이며 값 배열은 UTF-8 문자 문자열로 압축됩니다.

각 명칭과 일치하는 정규 표현식을 검색하여 값으로 인덱스를 선택하고 있습니다. 또한 가장 긴 정규 표현식이 필요했기 때문에 tuppence / half-groat case (value 8)를 기본값으로 사용하고 있습니다. 마찬가지로 일부 패턴은 다른 값이 이전 패턴과 이미 일치한다고 가정하므로 각 정규 표현식은 원하는 값만 나머지 값과 만 구별합니다. 이것을 사용하여 교파 순서를 다시 정렬하여 다른 몇 바이트를 줄일 수 있습니다.

Pyth 를 이길 수 있게 도와 준 Ventero에게 감사합니다 !

파이썬 3 : 264 239 자

f=lambda c:c[:2]in"hatw"and f(c[5-(c>'t'):])*2/4**(c<'t')or[1,4,4,4,8,12,16,24,24,48,48,96,240,1008,960]['fapecoentuthgrsitashboflcrgu'.find(c[:2])//2]
a,b=input().split(" in ")
x,c=a.split(" ",1)
print(a,"is %0.4f"%(eval(x)*f(c)/f(b)),b)

이 함수 f는 사전을 사용하여c 처음 두 글자 를 지문으로 표시하여 통화 문자열의 실링 값을 가져옵니다. 에서 문자열을 찾아서 . 접두사 "half"와 "two"는 접두사와 공백을 자르고 승수를 적용하여 감지하고 설명합니다. "halfpenny"에는 "half"뒤에 공백이 없기 때문에 "enny"가 발생하지만 가상의 "en"항목으로 처리됩니다.

사전 검색 기능을 많이 개선 한 @isaacg 및 @grc 덕분입니다.

파이썬 2-345358

s=str.startswith
h='half'
u,v=raw_input().split(' in ')
a,b=u.split(' ',1)
C=dict(fa=1,pe=4,twop=8,tu=8,thr=12,gr=16,si=24,ta=24,sh=48,b=48,fl=96,c=240,po=960,so=960,q=960,gu=1008)
C.update({h+'p':2,h+' gr':8,'two ':96,h+' c':120,h+' s':480,h+' gu':504})
for c in iter(C):
 if s(b,c):k=C[c]
 if s(v,c):f=C[c]
print u+' is %0.4f '%(eval(a)*k/f)+v

파이썬에서 입력 번호가 부동 소수점이어야합니다. 144.1

파이썬 3에서는 이것이 단축 될 수 있다고 생각합니다 ...

... @ xnor 덕분에 확인되었습니다. 또한 더 나은 알고리즘을 갖는 것이 중요하다는 것을 확인했습니다.)

하스켈-315 바이트

w x=f(u x)*v(u x)
f=maybe 1 id.l"ha tw tu th si"[0.5,2,2,3,6]
v x@(_:xs)|Just w<-l"bo cr gr gu so co fa fl pe po qu sh ta"[12,60,4,252,240,1,0.25,24,1,240,240,12,6]x=w|True=v xs
l k v x=take 2 x`lookup`zip(words k)v
u=unwords
i s|(n:x,_:t)<-span(/="in")$words s=u$n:x++["is",show$read n*w x/w t]++t
main=interact i

자바 스크립트 (ES5), 344

I=prompt()
n=I.match(/[\d.]+ /)[0]
A=I.slice(n.length).split(" in ")
function m(x){return{fi:1,he:2,p:4,pe:4,cr:4,tn:8,hg:8,tp:12,te:12,g:16,gs:16,sn:24,tr:24,si:48,b:48,fn:96,to:96,hc:120,c:240,cs:240,hs:480,hgtrue:504,ps:960,se:960,q:960,ga:1008}[x[0]+(x[5]||"")+(x[10]=="a"||"")]}
alert(n+A[0]+" is "+(n*m(A[0])/m(A[1])).toFixed(4)+" "+A[1])

해시 함수 접근 방식을 사용했습니다 ... 입력 처리가 얼마나 복잡한 지 (상대적으로) 과소 평가했다고 생각합니다 (정규식 접근 방식에서는 숫자에 신경 쓰지 않을 것입니다).

@FryAmTheEggMan의 답변을 기반으로 다른 테스트 방법 str.startwith .

파이썬 2 : 317

h='half'
C=dict(fa=1,pe=4,twop=8,tu=8,thr=12,gr=16,si=24,ta=24,sh=48,b=48,fl=96,c=240,po=960,so=960,q=960,gu=1008)
C.update({h+'p':2,h+' gr':8,'two ':96,h+' c':120,h+' s':480,h+' gu':504})
u,v=raw_input().split(' in ')
a,b=u.split(' ',1)
s=lambda x:x and C.get(x, s(x[:-1]))
print u+' is %0.4f '%(eval(a)*s(b)/s(v))+v

자바 스크립트 ES6, 264 (273)

f=t=>{s=t.split(x=' in')
c=d=>{'t0sh|bo0^p|co0f0fp0fl|b b0gu0d|v0wn0gr0f g|t..?p0f s0f gu0f c0x|an'.split(0).map((e,i)=>{v=s[d].match(e)?[12,48,4,1,2,96,1008,960,240,16,8,480,504,120,24][i]:v})
return v}
return s.join(' is '+~~(1e4*t.split(' ')[0]*c(0)/c(1))/1e4)}

t=prompt()
s=t.split(x=' in')
c=function(d){'t0sh|bo0^p|co0f0fp0fl|b b0gu0d|v0wn0gr0f g|t..?p0f s0f gu0f c0x|an'.split(0).map(function(e,i){v=s[d].match(e)?[12,48,4,1,2,96,1008,960,240,16,8,480,504,120,24][i]:v})
return v}
alert(s.join(' is '+~~(1e4*t.split(' ')[0]*c(0)/c(1))/1e4))

이것은 가장 넓은 범위에서 시작하여 다양한 정규 표현식과 비교하여 각 통화의 가치를 얻습니다 /t/. 다른 일치가 있으면 값을 덮어 씁니다. 정규식 문자열을 다시 정렬하여 몇 바이트를 줄이는 방법이있을 수 있습니다. 위의 스 니펫을 사용하여 테스트 할 수 있습니다 (대화 상자를 사용하고 ES6 화살표 기능을 제거하여 누구나 쉽게 코드를 테스트 할 수 있도록 포맷되었습니다). Alconja에게 제안 해 주셔서 감사합니다.