コードを使用して比較的簡単に実装できる単純なタスクがあります。あなたの目標は、HH：MM形式で時刻を指定すると、スペイン語で書かれた時刻を出力するプログラムを作成することです。多くの人はおそらくこれを行う方法を知らないので、詳しく説明します。

スペイン語の時間はかなり論理的です。通常、「Es la / Son las（hour）y（minutes）」のパターンに従います。時間は12時間形式であり、「Es la」は時間が1（つまり1時）の場合にのみ使用されます。議事録は別の話です。分が30未満の場合、上記のように表されます。ただし、分が30を超える場合、時間は切り上げられ、分が減算されます。たとえば、7：35は「8時間-25分」に相当します。さらにいくつかの例を以下に示します。必要なスペイン語の番号のリストはここにあります。一部の数字にはアクセントがありますが、これらは必要ありません。

注：ソースには「uno」と書かれていますが、文法的に正しいためには「una」である必要があります。これは、これまでの回答には影響しません。

注2：また、「cero」は不要です。プログラムが「Es la una」または「Son las tres」を出力する場合、それで問題ありません。これらのルールの変更については申し訳ありません。

ルール

• 入力は、STDINまたはご使用の言語の同等物を通じて提供されます。
• 外部ライブラリからの読み取りはありません。
• コードは無効な入力で何でもできます。

ボーナス

• -10は、コードにこれらの余分なフレーズが追加されている場合です。「y cuarto」は：15、「y media」は：30、「menos cuarto」は：45（切り上げ）です。
• -15は、コードがAMとPMを処理できる場合、「de lamañana」と「de la tarde」で応答します。
• 入力が提供されない場合、コードが現在の時刻を変換できる場合は-15。

得点

• これはコードとゴルフのチャレンジであり、文字ではなくバイトでスコアリングされます。

例

入力：8:10 出力：Son las ocho y diez.

入力：6:45 出力：Son las siete menos quince (or cuarto).

入力：1:29 出力：Es la una y veintinueve.

入力：12:55 出力：Es la una menos cinco.

ここで何か指定することがあれば教えてください。これは私の最初の質問なので、完全ではありません。

JavaScript（ES6）308 316

Edit2のバグ修正 編集は、
ポップアップを使用してI / Oを備えたプログラムとしてボーナスを請求するのを忘れていました。

s='media0uno0dos0tres0cuatro0cinco0seis0siete0ocho0nueve0diez0once0doce0trece0catorce0cuarto0dieci0veint'.split(0),
N=n=>n<16?s[n]:n<20?s[16]+s[n-10]:n>29?s[0]:s[17]+(n>20?'i'+s[n-20]:'e'),
[h,m]=prompt().split(':'),
alert(((h=(10-~h+(m>30))%12)?'Son las '+N(1+h):'Es la una')+(m>30?' menos '+N(60-m):-m?' y '+N(~~m):''))

テスト可能な機能として

F=t=>(
  s='media0uno0dos0tres0cuatro0cinco0seis0siete0ocho0nueve0diez0once0doce0trece0catorce0cuarto0dieci0veint'.split(0),
  N=n=>n<16?s[n]:n<20?s[16]+s[n-10]:n>29?s[0]:s[17]+(n>20?'i'+s[n-20]:'e'),
  [h,m]=t.split(':'),
  ((h=(10-~h+(m>30))%12)?'Son las '+N(1+h):'Es la una')+(m>30?' menos '+N(60-m):-m?' y '+N(~~m):'')
)

FireFox / FireBugコンソールでテストする

for(i=0;i<13;i++)
{
   console.log(F(i+':'+i)+'. '+F(i+':'+(i+15))+'. '+F(i+':'+(i+30))+'. '+F(i+':'+(i+45)))
}

出力

Son las doce. Son las doce y cuarto. Son las doce y media. Es la una menos cuarto
Es la una y uno. Es la una y dieciseis. Son las dos menos veintinueve. Son las dos menos catorce
Son las dos y dos. Son las dos y diecisiete. Son las tres menos veintiocho. Son las tres menos trece
Son las tres y tres. Son las tres y dieciocho. Son las cuatro menos veintisiete. Son las cuatro menos doce
Son las cuatro y cuatro. Son las cuatro y diecinueve. Son las cinco menos veintiseis. Son las cinco menos once
Son las cinco y cinco. Son las cinco y veinte. Son las seis menos veinticinco. Son las seis menos diez
Son las seis y seis. Son las seis y veintiuno. Son las siete menos veinticuatro. Son las siete menos nueve
Son las siete y siete. Son las siete y veintidos. Son las ocho menos veintitres. Son las ocho menos ocho
Son las ocho y ocho. Son las ocho y veintitres. Son las nueve menos veintidos. Son las nueve menos siete
Son las nueve y nueve. Son las nueve y veinticuatro. Son las diez menos veintiuno. Son las diez menos seis
Son las diez y diez. Son las diez y veinticinco. Son las once menos veinte. Son las once menos cinco
Son las once y once. Son las once y veintiseis. Son las doce menos diecinueve. Son las doce menos cuatro
Son las doce y doce. Son las doce y veintisiete. Es la una menos dieciocho. Es la una menos tres

はい、世界で最悪のゴルファーによってコード化された、ゴルフコンテストに登場する最も予想されていない言語が帰ってきました！

Java-676バイト（716-10-15-15）

ゴルフ：

class A{void main(String[]a){java.util.Calendar c=java.util.Calendar.getInstance();int h,m;String s="";h=c.get(c.HOUR);m=c.get(c.MINUTE);String[]e={"doce","una","dos","tres","quatro","cinco","ses","siete","ocho","nueve","diez","once","doce","trece","catorce","quarto","çseís","çsiete","çocho","çnueve","xe","xiuno","xidós","xitrés","xiquatro","xicinco","xiséis","xisiete","xiocho","xinueve","media"};for(int i=0;++i<30;e[i]=e[i].replace("ç","dieci"),e[i]=e[i].replace("x","vient"));s+=(h==1&m<30|h==12&m>30)?"Es la ":"Son las ";s+=(m<=30)?e[h]:(h==12&m>30)?e[1]:e[h+1];s+=(m==0)?" certas":(m<=30)?" y "+e[m]:" menos "+e[60-m];s+=(c.get(c.AM_PM)==0)?" de la mañana.":" de la tarde.";System.out.println(s);}}

ゴルフをしていない：

public class A {

    public static void main(String[] a) {
        java.util.Calendar c = java.util.Calendar.getInstance();
        int h, m;
        String s = "";
        h = c.get(c.HOUR);
        m = c.get(c.MINUTE);
        String[] e = {"doce", "una", "dos", "tres", "quatro", "cinco", "ses", "siete", "ocho", "nueve", "diez", "once", "doce", "trece", "catorce", "quarto", "çseís", "çsiete", "çocho", "çnueve", "xe", "xiuno", "xidós", "xitrés", "xiquatro", "xicinco", "xiséis", "xisiete", "xiocho", "xinueve", "media"};
        for (int i = 0; ++i < 30; e[i] = e[i].replace("ç", "dieci"), e[i] = e[i].replace("x", "vient"));
        s += (h == 1 & m < 30 | h == 12 & m > 30) ? "Es la " : "Son las ";
        s += (m <= 30) ? e[h] : (h == 12 & m > 30) ? e[1] : e[h + 1];
        s += (m == 0) ? " certas" : (m <= 30) ? " y " + e[m] : " menos " + e[60 - m];
        s += (c.get(c.AM_PM) == 0) ? " de la mañana." : " de la tarde.";
        System.out.println(s);
    }
}

お得な情報quartoやmedia、AM / PMとし、一切の入力を持っていません。だから、もしそれらの機能を実装していなかったとしても、私はさらに低いスコアを持っているでしょうが、すべてのボーナスを請求することができます。フェイスパーム

Python 3：294文字-10 = 284

h,m=map(int,input().split(':'))
t="y"
d="yunoydosytresycuatroycincoyseisysieteyochoynueveydiezyonceydoceytreceycatorceycuarto".split(t)*2
if m>30:h=h%12+1;m=60-m;t="menos"
print(["Es la una","Son las "+d[h]][h>1],t,[d[m]or"cero",["dieci","veint"+'ei'[m>20],"media"][m//10-1]+d[m%10]][m>15]+".")

これにより、「クアルト」と「メディア」を使用した場合に10ポイントのボーナスが得られます

時間と分をints として読み取ります。分が30を超える場合、次の時間に移動し、60から離れた分を測定し、接続詞を「メノ」に変更します。

リストには、d私たちが作る15までのスペイン語の数字の翻訳があるd[0]こと''「diecicero」のようなものを防ぐために。これはsplit(' ')、最初のスペースで厄介に呼び出すことで行われます。通常の人splitはそれを無視します。ゼロ分ケースは後で処理されます。

15を超える数値を取得するには、10桁の文字列と適切な1桁の文字列を組み合わせます。15そして30無償で「メディア」と「クアルト」と書かれています。

Python 3はPython 2に対して1文字のネットを保存します：input代わりに-4 raw_input、印刷中の括弧に対して+2、に対して+1 //。

PHP、351 349 360-15 = 345バイト

<?$a=split(~ß,~œšßŠ‘ß›Œß‹šŒßœŠž‹ßœ–‘œßŒš–ŒßŒ–š‹šßœ—ß‘Šš‰šß›–š…ß‘œšß›œšß‹šœšßœž‹œšßŽŠ–‘œšß›–šœ–߉š–‘‹–ß‹š–‘‹ž)?><?=preg_filter(~Ð×ÑÔÖÅ×ÑÔÖК,'(($h=($1-($k=$2<31))%12+1)>1?~¬‘ß“žŒß:~ºŒß“žß).$a[$h].($k?~߆ß:~ß’š‘Œß).(($m=$k?$2+0:60-$2)<16?$a[$m]:($m<20?$a[16].$a[$m%10]:($m<21?viente:($m<30?$a[17].$a[$m%10]:$a[18])))).~Ñ',$_GET[0]?:date(~·Å–));

このプログラムはコマンドラインではありません。$ _ GET [0]を介して入力を受け取ります。php.iniで通知を無効にする必要がある場合があります。Niet the Dark Absolのおかげで、入力なしのオートタイムが付属しています。

使用されるトリック：

~(...) PHPは通常0x80から0xFFまでのすべてのASCIIが文字列であると想定するため、引用符は必要ないため、文字列をビット単位で反転することで1バイトを節約します。

<?=preg_filter(...,...)：<?=は書き込みのショートカットです<? echo。preg_filter()通常、正規表現を使用して文字列に置換を適用しますが、減価償却された/ e修飾子を使用して、結果の文字列をPHPコードとして評価できます。したがって、入力文字列を2つの個別の変数に分割する代わりに、一致した入力文字列で後方参照（$ 1と$ 2）を使用して、大量のバイトを節約できます。

C ++：474 ... 422 411バイト

このバージョンは、クアルト/メディアボーナスを引き換えています（-10）。

#include<cstdlib>
#include<cstdio>
int main(int u,char**v){char*b[]={"cero","una","dos","tres","cuatro","cinco","seis","siete","ocho","nueve","diez","once","doce","trece","catorce","cuarto","dieci","veinti","media",0,"veinte"};int h=atoi(v[1]),m=atoi(v[1]+2+(v[1][2]>57)),n=m>30,o;h=n?h%12+1:h;m=o=n?60-m:m;if(u=m>15&m!=20)o=m%10;printf("%s %s %s %s%s",h>1?"Son las":"Es la",b[h],n?"menos":"y",u?b[m/10+15]:"",b[o?o:m]);}

コードゴルフの私の最初の試み！今週の週末に改善を試みます。

ゴルフをしていない：

#include<cstdlib>
#include<cstdio>
int main(int u,char**v)
{
char*b[]={"cero","una","dos","tres","cuatro","cinco","seis","siete","ocho","nueve","diez","once","doce","trece","catorce","cuarto","dieci","veinti","media",0,"veinte"};
int h=atoi(v[1]),m=atoi(v[1]+2+(v[1][2]>57)),n=m>30,o;
h=n?h%12+1:h;
m=o=n?60-m:m;
if(u=m>15&m!=20)o=m%10;
printf("%s %s %s %s%s",h>1?"Son las":"Es la",b[h],n?"menos":"y",u?b[m/10+15]:"",b[o?o:m]);
}

ルア、450-10（クアルト/メディア）-15（マナナ/タルド）= 425

n={'uno','dos','tres','cuatro','cinco','seis','siete','ocho','nueve','diez','once','doce','trece','catorce','cuarto',[20]='veinte',[30]='media'}for i=1,9 do n[i+10]=n[i+10]or'dieci'..n[i]n[i+20]='veinti'..n[i]end H,M=io.read():match('(%d+):(%d+)')H,M=H+0,M+0 X,Y='tarde',' y 'if H<12 then X='manana'end if M>30 then H,M,Y=H+1,60-M,' menos 'end H=(H-1)%12+1 S=H==1 and'es la una'or'son las '..n[H]if M>0 then S=S..Y..n[M]end S=S..' de la '..X print(S)

• ジェネレーターを21-29に書き換えて12バイトを削除しました。
• 依存する式を置き換えH>=12てH<12切り替えることで、さらに1を削除しました。
• 関数からグローバルネームスペースを汚染することにより、さらに4を削除しました（悪意がありますが、ゴルフのために:)。
• 正規表現を修正し、コロンを忘れました。ただし、バイトカウントは変更されません。
• ゼロ分のケースを修正table.concatし、文字列操作のために交換し、@ edc65の提案を追加し、最終的に22バイトを追加しました。
• 恥ずかしい。引上げfunction主チャンクに出て体はなんとによって長さを減少させた15バイト。

D-484バイト

import std.stdio,std.conv,std.string;void main(){auto n="cero una dos tres cuatro cinco seis siete ocho nueve diez once doce trece catorce quince dieciséis diecisiete dieciocho diecinueve e iuno idos itres icuatro icinco iseis isiete iocho inueve treinta".split;auto p=stdin.readln()[0..$-1];int b=to!int(p[0..$-3]),a=to!int(p[$-2..$]);auto c=a;b=a>30?b+1:b;b%=12;a=a>30?60-a:a;writefln("%s %s %s %s", b==1||b==12?"Es la":"Son las",n[b],c>30?"menos":"y",(a/10==2?"vient":"")~n[a]);}

Python 3、409バイト

d='cero uno dos tres cuatro cinco seis siete ocho nueve diez once doce trece catorce quince dieciseis diecisiete dieciocho diecinueve veinte xuno xdos xtres xcuatro xcinco xseis xsiete xocho xnueve treinta';d=str(d.replace('x','veinti')).split();t=input().split(':');i=int(t[1]);j=int(t[0]);print(["Son las","Es la"][1<(2*j+i/30)%24<=3],[d[[j%12+1,j][i<31]],'una'][j==1],'y'if i<31 else'menos',d[min(i,60-i)])

ルビー、313（338-15-10）

このソリューションは、入力が与えられなかった現在の時刻を翻訳し、「y cuarto」、「y media」、「menos cuarto」の3つのフレーズを追加します。

require'time'
t,x,s=Time,$*[0],%w[cero una dos tres cuatro cinco seis siete ocho nueve diez once doce trece catorce cuarto]
1.upto(9){|i|i>5?s[10+i]="dieci"+s[i]:0;s[20+i]="veinti"+s[i]}
s[20]="veinte"
s<<"media"
c=x ?t.parse(x):t.new
h,m=c.hour%12,c.min
m<31?(a=" y "):(h,m,a=h+1,60-m," menos ")
$><<(h<2?"Es la ":"Son las ")+s[h]+a+s[m]

バッシュ423

（433-10 = 423、発音区別符号とクアルトを削除すると、381になります）

IFS=: read h m
s=y
m=${m#0}
[ $m -gt 30 ]&&h=$(($h+1))&&s=menos
[ -z ${m%0} ]&&s=en&&m=punto
n[0]=0
o[0]=0
S=" séis siete ocho nueve"
n=(punto una dos trés cuatro cinco $S diez {on,do,tre,cator,quin}ce ${S// / dieci} veinte)
n=($(eval echo "${n[@]}" veinti\$\{n[{1..9}]\}))
n[3]=tres;n[6]=seis
n=(${n[@]} media\  $(tac -s' '<<<${n[@]}))
o=("${n[@]/q*/cuarto}")
a=Son\ las
[ $h = 1 ]&&a=Es\ la
echo $a ${n[$h]/p*/cero} $s ${o[$m]/%a/o}

Perl-297-10 + 1 = 288（pフラグをカウント）

編集：@guifaのおかげで、ボーナスを請求できるようになりました:)

#!/usr/bin/perl -p
sub n{($_=shift)%10?(once,doce,trece,catorce,cuarto)[$_>9?$_-11:5]||('',dieci,veinti)[$_/10].(0,un.pop,dos,tres,cuatro,cinco,seis,siete,ocho,nueve)[$_%10]:(cero,diez,veinte,media)[$_/10]}/:/;$a=$`%12;$b=$';$c=$b>30?(++$a,$b=60-$b,menos):'y';$_=($a-1?'Son las ':'Es la ').n($a,a)." $c ".n($b,o).'.'

読みやすいように、複数行に同じコードを示します。

sub n {
        ($_ = shift) % 10
            ? (once, doce, trece, catorce, cuarto)[$_ > 9 ? $_ -11 : 5]
                || ('', dieci, veinti)[$_ / 10]
                . (0, un.pop, dos, tres, cuatro, cinco, seis, siete, ocho, nueve)[$_ % 10]
            : (cero, diez, veinte, media)[$_ / 10]
}
/:/;
$a = $` % 12;
$b = $';
$c = $b > 30 ? (++$a, $b = 60 - $b, menos) : 'y';
$_ = ($a - 1 ? 'Son las ' : 'Es la ') . n($a, a) . " $c " . n($b, o) . '.'

Scala 652バイト-25

import java.util.Scanner
object S extends App{val s=new Scanner(System.in).useDelimiter("[:\n]")
var h=s.nextInt
var m=s.nextInt
if(m>30)m-=60 else h-=1
val n=m.abs
h%=24
val p=h%12
val l=List("una","dos","tres","cuatro","cinco","seis","siete","ocho","nueve","diez","once","doce","trece","catorce","cuarto")
val k=List("úno","dós","trés",l(3),l(4),"séis",l(6),"ócho",l(8))
println(s"""${if(p==0)"Es la"else"Son las"} ${l(p)} ${if(m>0)"y "else if(m<0)"menos "}${if(n==1)"uno"else if(n==0)""else if(n<=15)l(n-1) else if(n==30)"media"else if(n<20)"dieci"+k(n-11)else if(n==20)"veinte"else"veinti"+k(n-21)} de la ${if(h<12)"mañana"else"tarde"}.""")}

Pyth：277 a bunch more 234-10（クアルト/メディアボーナス）= 224バイト

オリジナルから50バイト以上削減されました！

=H" y "ANkmsdcz\:Kc"cero uno dos tres cuatro cinco seis siete ocho nueve diez once doce trece catorce cuarto veinte"dI>k30=k-60k=H" menos "=N?1qN12+N1)++?+"Son las "@KN>N1"Es la una"H??eKqk20?@Kk<k16+?"dieci"<k21+PeK\i@K%kT<k30"media"

Pythはめちゃめちゃ長いですが、それは生データがあるためです。おそらくさらにゴルフすることができます。タスクを時間、y / menos、10桁の分、1桁の分に分割する明白な手法を使用し、翻訳配列を使用して数値を変換し、その他のすべてを3進法のクラップトンを使用して変換します。

=H" y "                 Set H to " y "
A                       Double Assignment
 Nk                     The variables N and k (hours and mins)
 m  cz\:                Map input split by ":"
  sd                    Make both int
Kc"..."d                Set K to string split by spaces
I>k30                   If k>30
     =k-60k             Set k to 60-k
     =H" menos "        Set k to menos instead of y
     =N                 Set N
      ?   qN12          If N=12
       1                Go back to one
       +N1              Increment N
)                       Close entire if block 
+                       Concat of hours and minutes
 +                      Concat hours and y/menos
  ?           >N1       If hour greater than one
   +                    Concat of son las and hour
    "Son las "          "Son las "
    @KN                 Index translation array for hour
   "Es la una"          Else es la una
  H                     " y " or " menos "
 ?               <k30   If minutes less than 30
  ?  qk20               If minutes is 20
   ek                   Last element of array (veinte)
   ?   <k16             Else check if minutes<16
    @Kk                 Get minutes directly from array
    +                   Else tens and ones sum
     ?       <k21       If minutes<21
      "dieci"           "dieci"
      +PeK\i            Else get veinti from veinte
     @K%kT              Ones digit of minutes
  "media"               Else get "media"

ゴルフの歴史

• 10バイト-ボーナス、マルメロ、トリエンタは翻訳配列で置き換えることができるため、翻訳エッセイと同じサイズ以外の変更は不要です。
• 6バイト-再編成された3項-残念ながら、これにより4つの連続した3項演算子が削除されました:(
• 6バイト-その他のさまざまなゴルフ
• 6バイト-ゴルフされた最初の時間/分割り当て
• +3バイト-uno / unaを修正
• 3バイト-静脈から構築された静脈、ハードコーディングされていない
• 18バイト-16代未満のdieciを抽出<16
• 2バイト-理由なしにいくつかのスペースを削除しました
• 2バイト-1つの文字列に\を使用