Zadanie

Biorąc pod uwagę literę (A, B, C) i cyfrę (0-10), wyślij rozmiar odpowiadającego standardowego rozmiaru papieru (Seria A i B) lub pasującego standardowego rozmiaru koperty (seria C) w milimetrach w formacie aaaa x bbbbgdzie aaaai bbbbsą pomiary szerokości i wysokości w milimetrach zgodnie z ISO216 (seria A i B) lub ISO296 (seria C)

Aby to ułatwić, zacytuję tabelę rozmiarów papieru w Wikipedii

ISO paper sizes in portrait view
Format  A series    B series    C series
Size     mm × mm      mm × mm    mm × mm
0       841 × 1189  1000 × 1414 917 × 1297
1       594 × 841    707 × 1000 648 × 917
2       420 × 594    500 × 707  458 × 648
3       297 × 420    353 × 500  324 × 458
4       210 × 297    250 × 353  229 × 324
5       148 × 210    176 × 250  162 × 229
6       105 × 148    125 × 176  114 × 162
7        74 × 105     88 × 125   81 × 114
8        52 × 74      62 × 88    57 × 81
9        37 × 52      44 × 62    40 × 57
10       26 × 37      31 × 44    28 × 40

Przykłady wejść i wyjść:

**Test case 1**
Input: A4
Output: 210 x 297

**Test Case 2**
Input: B6
Output: 125 x 176

**Test Case 3**
Input: C2
Output: 458 x 648

Ważne uwagi:

1. Format „210 x 297” lub „1000 x 1414” itd. Chociaż jest to preferowany format, możesz pominąć „x” w danych wyjściowych, tj. W postaci tablicy lub dwóch liczb lub cokolwiek łaskocze Twoje upodobania o ile pomiar szerokości jest wyprowadzany przed wysokością.
2. Stosunek wysokości do szerokości jest w przybliżeniu równoważny pierwiastkowi kwadratowemu z 2, więc przy obliczaniu wysokości szerokość jest mnożona przez sqrt (2), a następnie zaokrąglana w górę lub w dół do najbliższego milimetra, w wyniku czego pomiary w tabeli powyżej. Może to pomóc w zmniejszeniu kodu.
3. W kolejnych rozmiarach serii po zejściu ze stołu szerokość jednego rozmiaru staje się wysokością następnego. Może to również pomóc w obniżeniu poziomu kodu.

Zasady:

1. To jest golf golfowy. W rezultacie obowiązują standardowe zasady. Wynik będzie oparty na liczbie bajtów. Najniższa liczba wygra.
2. Żadnych głupich luk , byliśmy tam wcześniej ... Nie będziemy już przez to przechodzić.
3. Jeśli możesz go kodować, rozważ także dołączenie linku do działającej instancji kodu, aby inni programiści i golfiści mogli dowiedzieć się, jak działa Twój kod. Nie jest to obowiązkowe, ale chciałbym zachęcić innych do zrobienia tego, abyśmy wszyscy mogli się wzajemnie uczyć. Z pewnością chciałbym dowiedzieć się więcej o innych językach golfistów, tam gdzie to możliwe.

Powodzenia.

JavaScript (ES7), 57 bajtów

Zapisano 1 bajt dzięki @WallyWest

s=>n=>[n,n-1].map(x=>.707**x*{A:841,B:1e3,C:917}[s]+.2|0)

C (gcc) , 113 111 90 78 70 bajtów

Musi -lmdziałać na TIO, ale działa dobrze na moim komputerze bez opcji.

Zaoszczędzono 20 bajtów dzięki pizzapantom 184 .

Zwróć wartości za pomocą wskaźnika.

f(a,b,c,d)int*c,*d;{float x=1e3*pow(.707,b+a%3/4.)+.2;*c=x,*d=x/.707;}

Wyjaśnienie:

f(a,b,c,d)int*c,*d;{          // calling by char, but receive as int
    float x = 1e3 * pow(.707, // float gives enough precision 
            a % 3 / 4.        // series: a%3/4.=.5,0,.25 when a=65,66,67
            + b) - .2;        // magic number to get correct roundings
    *c = x, *d = x / .707;
}

Python 2 , 103 97 93 84 83 81 bajtów

def f(l,n):w=[841,1000,917][ord(l)-65];h=int(w/.707);exec"w,h=h/2,w;"*n;print w,h

Wypróbuj online!

Partia, 105 bajtów

@set/aA=1189,B=1414,C=1297,h=%1,w=h*29/41
@for /l %%i in (1,1,%2)do @set/at=w,w=h/2,h=t
@echo %w% x %h%

41/29 ≅ √2

JavaScript, 53 bajty

L=>N=>[N+1,N].map(p=>1091/2**(p/2+~{B:2,C:1}[L]/8)|0)

f=

L=>N=>[N+1,N].map(p=>1091/2**(p/2+~{B:2,C:1}[L]/8)|0)

document.write('<table><tr><th><th>A<th>B<th>C',[...Array(11)].map((_,i)=>'<tr><th>'+i+['A','B','C'].map(j=>'<td>'+f(j)(i)).join``).join``);

Zaoszczędź wiele bajtów, używając alternatywnego formatu wyjściowego, dzięki Neilowi.

Java (OpenJDK 8) , 59 bajtów

f->s->new double[]{s=1e3*Math.pow(.707,s+f%3/4d)-.2,s/.707}

Wypróbuj online!

Zainspirowany wpisem C @Colera Su , a następnie ulepszony przeze mnie.

• 14 bajtów zaoszczędzonych dzięki Kevin Cruijssen

MATL , 34 33 30 bajtów

917 841 1000.5vjo)t2X^*hi2/W/k

Wypróbuj online! lub Zweryfikuj wszystkie przypadki testowe

Zaoszczędzono 4 bajty dzięki Luisowi Mendo

APL (Dyalog) , 31 28 bajtów

-2 dzięki ngn.

Pełna treść programu. Przyjmuje się ⎕IO( I ndex O rigin) 0, co jest domyślne w wielu systemach. Monituje o numer, a następnie literę, oba ze STDIN. Drukuje do STDOUT.

⌊.2+1E3÷2*8÷⍨('BC'⍳⍞)+4×⎕-⍳2

Wypróbuj online!

Nieznacznie zmodyfikowana wersja pozwala przetestować wszystkie możliwości na raz: Wypróbuj online!

⍳2 pierwsze dwa znaki , tj. 0 i 1

⎕- odejmij to od wprowadzania numerycznego

4× pomnóż przez to cztery

(… )+ Dodaj następujące

 ⍞ wprowadzanie znaków…

 'BC'⍳ … Ɩ ndex w tym ciągu („A” da 2, ponieważ indeks poza ostatnim)

8÷⍨ podziel to przez 8

2* podbij 2 do potęgi tego

1E3÷ 1000 podzielone przez to

.2+ dodaj ⅕ do tego

⌊ podłoga (zaokrąglona w dół)

Befunge, 69 56 55 bajtów

"}"8*~3%:"L"*7vv\p00-1_$..@
")"*":":-*!!\+<>2/00g:^:&\/

Wypróbuj online!

Wyjaśnienie

Nie mamy luksusu zmiennoprzecinkowego ani czegoś takiego jak funkcja potęgi w Befunge, więc obliczamy rozmiar podstawowy dla danego znaku formatu, f , w następujący sposób:

fn = f % 3
width = 1000 - (n * 76 + 7) * !!n
height = width * 58 / 41

Następnie wielokrotnie obracamy i dzielimy te wymiary, aby uzyskać odpowiedni podział dla podanego numeru rozmiaru.

"}"8*                         Push 1000 for later use in the width calculation.
     ~                        Read the format character from stdin.
      3%                      Convert into a number in the range 0 to 2.
        :"L"*7v               Calculate width = 1000 - (fn * 76 + 7) * !!fn
        -*!!\+<                  where fn is the format number derived above.
")"*":":                  /   Calculate height = width * 58 / 41.
                         \    Swap so the width is above the height on the stack.
                      v:&     Read the numeric size from stdin and duplicate for testing.
                      _       While not zero, go left.
                 p00-1        Decrement the size and move it from the stack into memory.
               v/             Swap the width and height.
               >2/            Divide the new width by 2.
                  00g:        Restore the size from memory and duplicate for testing.
                      _       While not zero, repeat this loop.
                       $      When zero, continue to the right and drop the size.
                        ..@   Output the width and height, then exit.