У мене просте завдання, яке слід порівняно легко реалізувати за допомогою коду. Ваша мета - написати програму, яка виводить час, написаний іспанською мовою, враховуючи час у форматі HH: MM. Багато людей, ймовірно, не знають, як це зробити, тому я докладно.

Час іспанською мовою досить логічний. Зазвичай вона відповідає схемі "Es la / Son las (година) y (хвилин)". Години проводяться у 12-годинному форматі, а "Es la" використовується лише в тому випадку, коли година становить 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 la mañ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 Редагувати забув вимагати бонус
Як програма з вводу-виводу через спливаюче вікно

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 і не має входу. Тож я можу вимагати всі бонуси, навіть якщо б я не застосував ці функції, я мав би ще нижчий бал, хаха. обличчя

Пітон 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]+".")

Це отримує десятибальний бонус за використання "cuarto" та "media"

Ми читаємо години і хвилини як int s. Якщо хвилин вище 30, ми переходимо до наступної години, вимірюємо хвилини від 60 і змінюємо сполучник на «менос».

У списку dє переклади іспанських номерів до 15. Ми намагаємось d[0]не ''допустити таких речей, як "diecicero". Це робиться за допомогою незграбного дзвінка split(' ')з початковим пробілом; черговий splitпросто проігнорував би це. Справа з нульовою хвилиною обробляється пізніше.

Щоб отримати числа вище 15, ми поєднуємо десятковий рядок з відповідним одноцифровим рядком. 15і 30записуються як "засоби масової інформації" та "куарто" безкоштовно.

Python 3 зберігає одну мережеву мережу над Python 2: -4, inputзамість 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 зазвичай передбачає, що всі ASCII від 0x80 до 0xFF - це рядок.

<?=preg_filter(...,...): The <?= ярлик для написання <? echo. preg_filter()зазвичай застосовує заміни на рядок за допомогою регулярного вираження, але ми можемо використовувати модифікатор зношеного / e, щоб оцінити отриманий рядок як код PHP. Отже, замість того, щоб розділяти вхідний рядок на дві окремі змінні, ми можемо використовувати зворотні референції ($ 1 та $ 2) на відповідній рядку вводу, економлячи велику кількість байтів.

C ++: 474 ... 422 411 байт

Ця версія окуповує бонус cuarto / media (-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)

• Випав 12 байт, переписавши генератор на 21-29.
• Випав ще 1, замінивши H>=12наH<12 і перемикання на залежну експресію навколо.
• Упав ще 4, забруднивши глобальний простір імен від функції (зло, але в інтересах гольфу :).
• Виправлений регекс, я забув товсту кишку. Однак кількість байтів не змінюється.
• Виправлено випадок нульових хвилин, поміняли місцями table.concat на рядки ops та додано пропозицію @ 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".

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]

Bash 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) . '.'

Скала 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"}.""")}

Піт : на 277 купу більше 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, але це тому, що є кілька необроблених даних. Можливо, можна ще більше пограти в гольф. Використовує очевидну техніку розподілу задач на години, у / меноси, десятки цифр хвилин і цифри хвилин, а потім переводить числа за допомогою перекладацького масиву та всього іншого, використовуючи лайно тернаріїв.

=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 байт - реорганізовані тернари - на жаль, це видалило 4 послідовних тризначних оператора :(
• 6 байт - інші різні гольфи
• 6 байт - початкова година / хв. Завдання для гольфу
• +3 байт - фіксований uno / una
• 3 байти - сконструйовано veinti з veinte, не жорстко кодовано
• 18 байт - видобуті дієці з підлітків <16
• 2 байти - видалено пробіли там без причини
• 2 байти - використовується \ для однієї рядок символів