कछुओं के लिए फ़िज़ बज़


35

समस्या का विवरण

कल्पना कीजिए कि आप ग्रिड पर एक कछुए हैं। आपको दो नंबर f और b दिए गए हैं , और आप पूर्व की ओर मुंह कर रहे हैं। आप निम्न नियमों के अनुसार, आपके द्वारा सामना की जाने वाली कोशिकाओं में से प्रत्येक की गिनती करते हुए, ग्रिड के पार मार्च करते हैं:

  • डिफ़ॉल्ट रूप से, आप उस सेल की गणना लिखते हैं, जिसमें आप आगे बढ़ते हैं।
  • यदि गिनती f से विभाज्य है , तो आप Fउस सेल को लिखते हैं जिसमें आप हैं, फिर दाएं मुड़ें, फिर आगे चलें।
  • यदि गिनती b से विभाज्य है , तो आप Bउस सेल को लिखते हैं जिसमें आप हैं, फिर बाएं मुड़ें, फिर आगे चलें।
  • यदि गिनती f और b दोनों से विभाज्य है FB, तो आप उस सेल को लिखते हैं , जिसमें आप हैं, फिर आगे चलें।
  • यदि आप एक वर्ग तक पहुँचते हैं, तो आप पहले से ही हैं, तो आप रुक जाते हैं।

उदाहरण के लिए, f = 3 और b = 5 का उपयोग करते हुए इन नियमों का पालन करना इस तरह एक पैटर्न उत्पन्न करेगा:

    F 28 29 FB  1  2  F
   26                 4
 F  B                 B  F
23                       7
22                       8
 F  B                 B  F
   19                11
    F 17 16 FB 14 13  F

चुनौती

एक प्रोग्राम या फ़ंक्शन लिखिए जो f और b के अनुरूप इनपुट के रूप में दो संख्याओं को स्वीकार करता है , और उपरोक्त नियमों द्वारा दिए गए इन नंबरों के लिए पैटर्न के रूप में उत्पादन करता है।

स्वरूपण आवश्यकताएँ:

  • प्रत्येक कोशिका दो वर्ण चौड़ी होती है
  • इन दो वर्णों के भीतर सेल सामग्री सही संरेखित है
  • एक ही पंक्ति के सेल को एक स्थान द्वारा सीमांकित किया जाता है
  • कक्षों के पहले स्तंभ में एक गैर-रिक्त कक्ष होना चाहिए
  • सभी पंक्तियों में गैर-रिक्त कक्ष होना चाहिए
  • ट्रेलिंग व्हाट्सएप की आवश्यकता नहीं है, लेकिन अनुमति दी गई है
  • हालांकि, प्रत्येक पंक्ति की कुल चौड़ाई गैर-खाली कॉलम की संख्या से 3 गुना से अधिक नहीं होनी चाहिए

आपका कोड प्रदान किए गए परीक्षण मामलों के लिए काम करना चाहिए।

मानक खामियों को अस्वीकार कर दिया जाता है।

यह कोड गोल्फ है; बाइट्स जीत में सबसे कम जवाब।

परीक्षण के मामलों

(f = 3, b = 5 मामला यहां एक शिष्टाचार सुविधा के रूप में दोहराया गया)।

f=3, b=5 ->
    F 28 29 FB  1  2  F
   26                 4
 F  B                 B  F
23                       7
22                       8
 F  B                 B  F
   19                11
    F 17 16 FB 14 13  F

f=4, b=10 ->
 F 25 26 27  F
23          29
22        1  2  3  F
21                 5
FB                 6
19                 7
18           B  9  F
17          11
 F 15 14 13  F

f=3, b=11 ->
 F 16 17  F
14       19
13     1  2  F
 F  B        4
   10        5
    F  8  7  F

f=5, b=9 ->
    F 41 42 43 44  1  2  3  4  F
   39                          6
   38                          7
   37                          8
 F  B                          B  F
34                               11
33                               12
32                               13
31                               14
 F 29 28  B              B 17 16  F
         26             19
          F 24 23 22 21  F

f=5, b=13 ->
    F 31 32 33 34  F
   29             36
   28        1  2  3  4  F
   27                    6
 F  B                    7
24                       8
23                       9
22              B 12 11  F
21             14
 F 19 18 17 16  F

1
क्या हम इस बात की गारंटी देते हैं कि 100 में पहुंचने से पहले इनपुट हमेशा टकराव का कारण बनेगा?
मार्टिन एंडर

हाँ। आमतौर पर, जब तक आपका कोड उपलब्ध कराए गए परीक्षण मामलों के लिए काम करता है जब तक आप जाना अच्छा न हो।
एच वाल्टर्स

1
क्या कोई विशिष्ट स्थान है जो आप (कछुए) शुरू करते हैं?
कृति लिथोस

@KritiiLithos No. ग्रिड के बाएं / शीर्ष / दाएं / निचले हिस्से को परिभाषित किया जाता है कि कछुआ कैसे यात्रा करता है, जो कि f और b पर निर्भर करता है।
एच वाल्टर्स

क्या f और b हमेशा पूर्णांक हैं?
corvus_192

जवाबों:


1

जावास्क्रिप्ट (ईएस 6), 230 240

(f,b)=>(d=>{for(g=[s=x=y=d];!(r=g[y]=g[y]||[])[x];d&1?d&2?y?--y:g=[,...g]:++y:d&2?x?--x:g=g.map(r=>[,...r]):++x)o=++s%f?'':(++d,'F'),s%b||(--d,o+='B'),r[x]=o||s})(0)||g.map(r=>[...r].map(c=>` ${c||' '}`.slice(-2)).join` `).join`
`

कम गोल्फ वाला

(f,b)=>{
  for(g=[s=x=y=d=0]; !(r = g[y]= g[y]||[])[x]; )
  {
    o=++s%f?'':(++d,'F')
    s%b||(--d,o+='B')
    r[x]=o||s,
    d&1
      ? d&2 ? y ? --y : g=[,...g] : ++y
      : d&2 ? x ? --x : g=g.map(r=>[,...r]) : ++x
  }
  return g.map(r=>[...r].map(c=>` ${c||' '}`.slice(-2)).join` `)
          .join`\n`
}

परीक्षा

F=
(f,b)=>(d=>{for(g=[s=x=y=d];!(r=g[y]=g[y]||[])[x];d&1?d&2?y?--y:g=[,...g]:++y:d&2?x?--x:g=g.map(r=>[,...r]):++x)o=++s%f?'':(++d,'F'),s%b||(--d,o+='B'),r[x]=o||s})(0)||g.map(r=>[...r].map(c=>` ${c||' '}`.slice(-2)).join` `).join`
`


function update()
{
  var i = I.value.match(/\d+/g)||[],f=+i[0],b=+i[1]
  O.textContent = (f>0 & b>0) ? F(f,b) : ''
}  

update()
<input id=I value="3 5" oninput="update()">
<pre id=O></pre>


5

अजगर 2, 379 338 326 बाइट्स

दो संख्याओं के रूप में इनपुट लेता है, एक अल्पविराम द्वारा अलग किया जाता है। उदाहरण के लिए।4,5या(4,5)

d=x=y=i=q=Q=e=E=0
p={}
f,b=input()
while(x,y)not in p:
 i+=1;l,r=i%b<1,i%f<1;d=(d+r-l)%4;p[x,y]=[[`i`,'F'][r],' F'[r]+'B'][l].rjust(2);q=min(q,x);Q=max(Q,x);e=min(e,y);E=max(E,y)
 if d%2:x+=(d==1)*2-1
 else:y+=(d!=2)*2-1
h,w=E-e+1,Q-q+1
A=[h*['  ']for x in' '*w]
for x,y in p:A[x-q][y-e]=p[x,y]
print'\n'.join(map(' '.join,A))

यदि पथ 99 से अधिक लंबा हो तो कार्य करता है, 384 343 330 बाइट्स

2 महत्वपूर्ण अंक दिखाता है।

d=x=y=i=q=Q=e=E=0
p={}
f,b=input()
while(x,y)not in p:
 i+=1;l,r=i%b<1,i%f<1;d=(d+r-l)%4;p[x,y]=[[`i%100`,'F'][r],' F'[r]+'B'][l].rjust(2);q=min(q,x);Q=max(Q,x);e=min(e,y);E=max(E,y)
 if d%2:x+=(d==1)*2-1
 else:y+=(d!=2)*2-1
h,w=E-e+1,Q-q+1
A=[h*['  ']for x in' '*w]
for x,y in p:A[x-q][y-e]=p[x,y]
print'\n'.join(map(' '.join,A))

उदाहरण:

input=(4,16)

 F 21 22 23  F
19          25
18          26
17          27
FB  1  2  3  F
15           5
14           6
13           7
 F 11 10  9  F

input=(6,7) (छोटा संस्करण)

                                              F 63 64 65 66 67 FB  1  2  3  4  5  F                                             
                               F 57 58 59 60  B                                   B  8  9 10 11  F                              
                              55                                                                13                              
                   F 51 52 53  B                                                                 B 15 16 17  F                  
                  49                                                                                        19                  
                  48                                                                                        20                  
          F 45 46  B                                                                                         B 22 23  F         
         43                                                                                                          25         
         42                                                                                                          26         
         41                                                                                                          27         
    F 39  B                                                                                                           B 29  F   
   37                                                                                                                      31   
   36                                                                                                                      32   
   35                                                                                                                      33   
   34                                                                                                                      34   
 F  B                                                                                                                       B  F
31                                                                                                                            37
30                                                                                                                            38
29                                                                                                                            39
28                                                                                                                            40
27                                                                                                                            41
FB                                                                                                                            FB
25                                                                                                                            43
24                                                                                                                            44
23                                                                                                                            45
22                                                                                                                            46
21                                                                                                                            47
 F  B                                                                                                                       B  F
   18                                                                                                                      50   
   17                                                                                                                      51   
   16                                                                                                                      52   
   15                                                                                                                      53   
    F 13  B                                                                                                           B 55  F   
         11                                                                                                          57         
         10                                                                                                          58         
         09                                                                                                          59         
          F 07 06  B                                                                                         B 62 61  F         
                  04                                                                                        64                  
                  03                                                                                        65                  
                   F 01 00 99  B                                                                 B 69 68 67  F                  
                              97                                                                71                              
                               F 95 94 93 92  B                                   B 76 75 74 73  F                              
                                              F 89 88 87 86 85 FB 83 82 81 80 79  F                                             

@ ईडिट: मुझे बचाने के लिए जोनाथन एलन, कॉपर, और शूकी के लिए धन्यवाद बाइट्स का एक गुच्छा।


हे, उन एन, 4 एन पैटर्न बहुत अच्छे हैं।
स्टेनबर्घ

बहुत बढ़िया। आप बदल सकते हैं while((x,y)not in p.keys()):करने के लिए while(x,y)not in p:और for x,y in p.keys():करने के लिए for x,y in p। आप बदल सकते हैं l,r=i%b==0,i%f==0करने के लिए l,r=i%b<1,i%f<1और d=(d+[0,1][r]-[0,1][l])%4करने के लिए d=(d+r-l)%4। आप बदल सकते हैं s=[[`i`,'F'][r],' F'[r]+'B'][l].rjust(2);p[(x,y)]=sकरने के लिए p[(x,y)]=[[`i`,'F'][r],' F'[r]+'B'][l].rjust(2)। अधिक हो सकता है
जोनाथन एलन

आप के h*[' ']for x in rangeबजाय के साथ एक बाइट बचा सकते हैं [' ']*h for x in range। इसके अलावा, के x+=[-1,1][d==1]साथ प्रतिस्थापित किया जा सकता है x+=(d==1)*2-1और के साथ प्रतिस्थापित किया y+=[1,-1][d==2]जा सकता है y+=(d!=2)*2-1। इसके अलावा, f,b=inputttएक टाइपो है?
कॉपर

p[(x,y)]=> p[x,y](यह सुनिश्चित नहीं है कि अगर यह पायथन 2 में काम करता है, हालांकि)
शूकी 11

4

एक्सेल VBA, 347 421 बाइट्स

नया संस्करण, व्हाट्सएप-आवश्यकताओं से निपटने के लिए। मेरे पहले संस्करण में ऐसा न होना मेरे हिस्से का निरीक्षण करना था, लेकिन यह बाइटकाउंट में इसका टोल लेता है ... यह अब इस्तेमाल की गई श्रेणी को सेल में काटता है और चिपकाता है A1

Sub t(f, b)
x=70:y=70:Do:s=s+ 1
If Cells(y,x).Value<>"" Then
ActiveSheet.UsedRange.Select:Selection.Cut:Range("A1").Select:ActiveSheet.Paste:Exit Sub
End If
If s Mod f=0 Then Cells(y,x).Value="F":q=q+1
If s Mod b=0 Then Cells(y,x).Value=Cells(y,x).Value & "B":q=q+3
If Cells(y,x).Value="" Then Cells(y,x).Value=s
Select Case q Mod 4
Case 0:x=x+1
Case 1:y=y+1
Case 2:x=x-1
Case 3:y=y-1
End Select:Loop:End Sub

यहां पुराना संस्करण है जो अंतिम परिणाम को स्थानांतरित नहीं करता है A1

Sub t(f,b)
x=70:y=70:Do:s=s+1:if Cells(y,x).Value<>"" then exit sub
If s Mod f=0 Then
Cells(y,x).Value="F":q=q+1
End If
If s Mod b=0 Then
Cells(y,x).Value=Cells(y,x).Value & "B":q=q+3
End If
If Cells(y,x).Value="" Then Cells(y,x).Value=s
Select Case q mod 4
Case 0:x=x+1
Case 1:y=y+1
Case 2:x=x-1
Case 3:y=y-1
End Select:Loop:End Sub

70, 70 (या एक्सेल में BR70) से शुरू होता है और इसके चारों ओर चलता है। समारोह के साथ कहा जाता है fऔर bपैरामीटर के रूप में:Call t(4, 16)

@ नील ने मुझे बस बाइट्स का एक गुच्छा बचाया, धन्यवाद!


1
आप की जगह तो q=q-1साथ q=q+3और Select Case qसाथ Select Case q Mod 4तो आप पिछले दो बयानों से छुटकारा मिल सकता है।
नील

However, the total width of each row must not exceed 3 times the number of non-empty columnsमुझे लगता है कि यह सिर्फ एक बड़ा ग्रिड स्थापित करने और सीमा से कुछ दूर शुरू करने के लिए जोड़ा गया था
कार्ल नैप

1
@KarlNapf फिक्स्ड।
steenbergh

3

एक्सेल VBA, 284 278 277 261 259 255 254 253 251 बाइट्स

Subमान जो इनपुट के रूप में लेता है F, Bऔर Sheets(1)ऑब्जेक्ट पर कोशिकाओं के लिए आउटपुट (जो Sheets(1)2 बाइट्स को बचाने के लिए ऑब्जेक्ट तक सीमित है )

Sub G(F,B)
Set A=Sheet1
R=99:C=R
Do
I=I+1
Y=Cells(R,C)
If Y<>""Then A.UsedRange.Cut:[A1].Select:A.Paste:End
If I Mod F=0Then Y="F":J=J+1
If I Mod B=0Then Y=Y+"B":J=J+3
Cells(R,C)=IIf(Y="",i,Y)
K=J Mod 4
If K Mod 2Then R=R-K+2 Else C=C+1-K
Loop
End Sub

उपयोग:

Call G(3, 4)

2

सी, 349 बाइट्स

जीसीसी के साथ संकलन (बहुत सारी चेतावनियों के साथ)

#define z strcpy(G[x][y],
char G[99][99][3];d=3,x=49,y=49,i=1,q,s=99,t,u=99,v;F(f,b){for(;!*G[x][y];i++){q=(!(i%f))<<1|!(i%b);q==3&&z"FB");if(q==2)z"F"),d=(d+3)%4;if(q==1)z"B"),d=(d+1)%4;!q&&sprintf(G[x][y],"%d",i);if(d%2)x+=d-2;else y+=d-1;s=s>x?x:s;t=t<x?x:t;u=u>y?y:u;v=v<y?y:v;}for(y=u;y<=v;puts(""),y++)for(x=s;x<=t;x++)printf("%2s ",G[x][y]);}

थोड़ा और अधिक प्रेरित संस्करण:

#define z strcpy(G[x][y],
char G[99][99][3];
d=3,x=49,y=49,i=1,q,s=99,t,u=99,v;

F(f,b)
{
    for(;!*G[x][y];i++)
    {
        q=(!(i%f))<<1|!(i%b);
        q==3&&z"FB");
        if(q==2)z"F"),d=(d+3)%4;
        if(q==1)z"B"),d=(d+1)%4;
        !q&&sprintf(G[x][y],"%d",i);
        if(d%2)x+=d-2;else y+=d-1;
        s=s>x?x:s;t=t<x?x:t;u=u>y?y:u;v=v<y?y:v;
    }
    for(y=u;y<=v;puts(""),y++)for(x=s;x<=t;x++)printf("%2s ",G[x][y]);
}

यहाँ एक 364 बाइट संस्करण है जो 100 से बड़ी संख्या को संभालता है

#define g G[x][y]
#define z strcpy(g,
char G[99][99][9];d=3,x=49,y=49,i=1,q,s=99,t,u=99,v;F(f,b){for(;!*g;i++){q=(!(i%f))<<1|!(i%b);q==3&&z"FB");if(q==2)z" F"),d=(d+3)%4;if(q==1)z" B"),d=(d+1)%4;!q&&sprintf(G[x][y],"%2d",i);if(d%2)x+=d-2;else y+=d-1;s=s>x?x:s;t=t<x?x:t;u=u>y?y:u;v=v<y?y:v;}for(y=u;y<=v;puts(""),y++)for(x=s;x<=t;x++)printf("%2s ",g+strlen(g)-2);}

1

पर्ल, 275 बाइट्स

इंडेक्सेशन पठनीयता के लिए प्रदान किया जाता है और कोड का हिस्सा नहीं है।

($f,$e)=@ARGV;
for($i=$x=1,$y=0;!$m{"$x,$y"};$i++){
    ($g,$m{"$x,$y"})=$i%$e&&$i%$f?($g,$i):$i%$f?($g+1,B):$i%$e?($g-1,F):($g,FB);
    ($g%=4)%2?($y+=$g-2):($x+=1-$g);
    ($a>$x?$a:$b<$x?$b:$x)=$x;
    ($c>$y?$c:$d<$y?$d:$y)=$y
}
for$k($c..$d){
    printf("%*s",1+length$i,$m{"$_,$k"})for$a..$b;
    say
}

स्पष्टीकरण:

कोड सभी स्थानों के हैश का ट्रैक रखकर काम करता है, और उचित मूल्य, में संग्रहीत किया जाता है %m। उदाहरण के लिए: में 3 5, $m{0,2}शामिल है 2, और $m{1,-3}= 26। यह इस फैशन में जारी है जब तक कि यह एक ऐसी जगह तक नहीं पहुंच जाता है जिसे पहले से परिभाषित किया गया है। इसके अतिरिक्त, यह कछुए के मार्ग की वर्तमान सीमाओं का ट्रैक रखता है, $a,$b,$c,$dअधिकतम और न्यूनतम के रूप में उपयोग करता है।

एक बार जब यह पहले से ही एक जगह पर पहुंच जाता है, तो यह सीमाओं का उपयोग करके मार्ग को प्रिंट करता है, सब कुछ रिक्त स्थान के साथ गद्देदार।

पथ के आकार की कोई सीमा नहीं है, न ही संख्याओं का आकार।


1

PHP , 292 बाइट्स

for($x=$y=$u=$l=0;!$q[$x][$y];$s="") {
    ++$i%$argv[1]?:$a-=1+$s="F";
    $i%$argv[2]?:$a+=1+$s.="B";
    $q[$x][$y]=$s?:$i;
    $z=[1,-2,-1,2][$a=($a+4)%4];
    $y+=$z%2;
    $x+=~-$z%2;
    $u>$y?$u=$y:$d>$y?:$d=$y;
    $l>$x?$l=$x:$r>$x?:$r=$x;
}
for(;$l++<=$r;print"\n")for($j=$u-1;$j++<=$d;)echo str_pad($q[$l-1][$j],3," ",0);

इसे ऑनलाइन आज़माएं!

संकेत स्पष्टता के लिए हैं, गिने नहीं जाते।

पर्ल जवाब के रूप में बहुत ही एल्गोरिथ्म का पालन करता है। ट्रैक जहां कछुआ एक 2D सरणी में रहा है, $aट्रैक जहां कछुए का सामना कर रहा है, और $u, $d, $l, $rमुद्रण के लिए सीमाओं को ट्रैक करें। str_padहमें यह सुनिश्चित करने की अनुमति देता है कि प्रत्येक प्रविष्टि प्रिंट फॉर्मेटिंग के लिए बिल्कुल 3 रिक्त स्थान है।

किसी कारण से मैं थाह नहीं कर सकता, PHP मुझे 0 के लिए आधे चर को आरंभीकृत करने से मना नहीं करता है, लेकिन अगर मैं दूसरों को शुरुआती नहीं करता हूं, तो भी प्रारूपण पर शिकंजा कसता है, भले ही यह आमतौर पर अनैतिक रूप से चर का इलाज करता है जब वे पहले होते हैं। उपयोग किया गया। इसलिए $x=$y=$u=$l=0बिट।


हमारी साइट का प्रयोग करके, आप स्वीकार करते हैं कि आपने हमारी Cookie Policy और निजता नीति को पढ़ और समझा लिया है।
Licensed under cc by-sa 3.0 with attribution required.