রেভু'আ বানান


16

বাস্তবে না আতবাশ স্ব প্যালিনড্রোম দ্বারা জেনারেলাইজড জ্যামেট্রিয়া ক্যালকুলেটর দ্বারা অনুপ্রাণিত হয় না ।

একটি স্ট্রিং প্রদত্ত গুলি দৈর্ঘ্যের এন , আউটপুট Revu'a ক্রম , যার মধ্যে প্রথম চরিত্র গুলি , প্রথম দুই অক্ষর গুলি , ... প্রথম এন -2 অক্ষর গুলি , প্রথম এন -1 অক্ষর গুলি , পুরো এস

স্ট্রিংটিতে কেবল ইউনিকোড (আপনি চান এমন কোনও এনকোডিং) অক্ষর থাকবে যা দৃ that় দিকনির্দেশনা এবং 0xFFFF এর মাধ্যমে 0x0000 পরিসরে পাওয়া যায়। তবে কোনও দিকনির্দেশনা নিয়ন্ত্রণের অক্ষর দেখা দেবে না। যে কোনও স্ট্রিংয়ের সমস্ত চরিত্রের একই দিকনির্দেশনা থাকবে।

আপনি ["t","te","tes","test"]স্থান-বিচ্ছিন্ন স্ট্রিং হিসাবে অ্যারে স্বরলিপিতে ফিরে আসতে পারেন"t te tes test" হিসাবে, বহু-লাইন পাঠ্য হিসাবে
t
te
tes
test
, একটি প্রাক-বিন্যাসযুক্ত অ্যারে

টি
Te
TES
পরীক্ষা
, বা অনুরূপ কিছু। শীর্ষস্থানীয়, পৃথককরণ এবং পিছনের ব্যবধানের পরিমাণগুলি গুরুত্বপূর্ণ নয় এবং উভয়ই নতুন লাইন অনুসরণ করছে না। সন্দেহ হলে জিজ্ঞাসা করুন।

ডান থেকে বাম ইনপুট অবশ্যই সঠিক ক্রমে ডান থেকে বাম আউটপুট দিতে হবে:
ইনপুট: "נחמן"
আউটপুট: "נ נח נחמ נחמן"বা

נ
נח
נחמ
נחמן
, বা ["נ","נח","נחמ","נחמן"]। মধ্যে অবৈধ ফলাফল নেই "נחמן נחמ נח נ", "ן מן חמן נחמן"এবং "נחמן חמן מן ן"

উত্তর:


17

ডায়ালগ এপিএল, 2 বাইট

,\

সংমিশ্রণ দ্বারা সংযোজনীয় হ্রাস। এখানে চেষ্টা করুন

আপনি যখন একটি উপসর্গ করেন তখন আউটপুটটির বিন্যাসটি আরও ভাল হয় তবে এটি পরিষ্কারভাবে ছাড়াই সঠিক ক্রমটি দেখায়।


2
ঠিক একই সমাধানটি কে
তে

@ জন কি কে ইউনিকোড পরিচালনা করে?
অ্যাডম

12

জাভাস্ক্রিপ্ট (ES6), 27 26 25 বাইট

@ নাইকেল এবং @ মার্টিনব্যাটনারকে একটি বাইট ধন্যবাদ সংরক্ষণ করা, একটি ধন্যবাদ @ নীলকে ধন্যবাদ

x=>x.replace(/.?/g,"$` ")

কিছু সুবিধা নেয় বিল্ট-ইন বৈশিষ্ট্য জাতীয় এর .replaceফাংশন। বিশেষত, প্রতিস্থাপনে, $`মিলিত চরিত্রের আগের সমস্ত কিছু হয়ে যায়। এর /.?/gপরিবর্তে রেজেক্স ব্যবহার করে /./gএটি শেষে খালি স্ট্রিংয়ের সাথেও মেলে।


আমি আরেকটি বাইট সংরক্ষণ করেছি: f=x=>x.replace(/.?/g,"$") You আপনি একটি অতিরিক্ত নেতৃত্বের জায়গা পেয়েছেন তবে এটি অনুমোদিত
নীল

@ নীল ধন্যবাদ, আমার কাজ করার মতো কোনও ক্লু ছিল না!
ETH প্রোডাকশনগুলি

ওহ, আমি আমার `সঠিকভাবে উদ্ধৃতি দিতে ভুলে গিয়েছি, কিন্তু আমি দেখতে পাচ্ছি আপনি কী বোঝাতে চেয়েছিলেন তা কার্যকর করেছিলাম।
নীল

6

জাপট, 10 4 বাইট

আমি বুঝতে পারি নি যে এই ক্ষেত্রে একটি ক্রমহ্রাসমান হ্রাস এত কার্যকর হবে। :-)

UŒ+

অ্যারে হিসাবে আউটপুট, ডিফল্টরূপে কমা দ্বারা পৃথক। যদি এটি অনুমোদিত না হয় তবে পরিবর্তে এই 6-বাইট কোডটি ব্যবহার করুন:

U¬å+ ·

এটি অনলাইন চেষ্টা করুন!

কিভাবে এটা কাজ করে

      // Implicit: U = input string
U¬    // Split U into chars.
  å+  // Cumulative reduce: loop through each item in the array, concatenating it to the total.
      // ["t","e","s","t"] => ["t","te","tes","test"].
      // Implicit: output last expression

7
"এটি অনলাইনে ব্যবহার করে দেখুন!" বাক্যাংশটি ব্যবহার করছে? এবং এটি অনলাইনে চেষ্টা করার সাথে লিঙ্ক না ! নৈতিকভাবে গ্রহণযোগ্য? : পি
মার্টিন এন্ডার

3
@ মার্টিনব্যাটনার আমি ডেস্ক ট্রেডমার্ক করার আগে প্রায় এক মাস ধরে জাপট এর উত্তরগুলিতে এই বাক্যাংশটি ব্যবহার করছিলাম। আমি মনে করি এটির ব্যবহার চালিয়ে যাওয়ার আমার কিছু নৈতিক অধিকার থাকা উচিত: পি
ইটিএইচ প্রডাকশনগুলি

6

ব্রেইনফাক, 40 বাইট

আমার কনসোলটি ডান-থেকে-বাম অক্ষরগুলিকে সমর্থন করে না, তবে আমি মনে করি না এটি কার্যকর হবে: সি

++++++++++>,[>,]<[<]>[[<+>-]<[<]>[.>]>]

Ungolfed:

++++++++++> # Store 10 (Newline)
,[>,]       # Store input
<[<]>       # Goto first character
[           # While next character
  [<+>-]    # Copy character to the left
  <[<]>     # Goto first character
  [.>]      # Print all charaters
  >         # Go to next character
]

13
আপনি তাদের পৃথক উত্তর হিসাবে পোস্ট করতে পারেন।
নিকেল

20
আপনার পৃথক উত্তর হিসাবে তাদের পোস্ট করা উচিত
টিমউই

17
আপনি আবশ্যক তাদের পৃথক উত্তর হিসাবে পোস্ট করুন।
নিকেল

21
আপনি হবে তাদের পৃথক উত্তর হিসাবে পোস্ট করুন।
টিমউই

11
আপনি তাদের আলাদা উত্তর হিসাবে পোস্ট করতে আমাকে কনভਵਾন করেছেন।
YoYoYonnY

5

রেটিনা, 11 7 বাইট

.
 $`$0

আউটপুট একটি স্থান এবং একটি পিছনে লাইনফিড সহ স্পেস-বিভক্ত।

এটি অনলাইন চেষ্টা করুন!


perl -pE 's/./$উত্তরোত্তর জন্য, এটি আরও 5 বাইটের জন্য পার্লের পোর্টেবল: $ & \ n / g'` ` (আমি 11 মাস দেরি করেছি, আমি জানি)
দাদা

4

পাইথন, 35

f=lambda s:f(s[:-1])+[s]if s else[]

and/orপুনরাবৃত্তি সহজ করার জন্য কোনও উপায় ব্যবহার করতে পারেনি কারণ এটি[]অবিশ্বাস্য পারেনি।

পুনরাবৃত্তির সমাধান, স্ট্রিংগুলির একটি তালিকা প্রদান করে।

এটি অনলাইনে চেষ্টা করুন


4

প্রোলোগ (এসডাব্লুআই), 60 49 বাইট

কোড:

p(X):-findall(S,atom_prefix(X,S),[_|R]),write(R).

ব্যাখ্যা:

atom_prefix সঙ্গে এক্স ইনপুট এবং সেট এস একটি পরিবর্তনশীল হিসাবে পরমাণুর 1 উপসর্গ দেয় এক্স খালি পরমাণু থেকে শুরু।

Findall সমস্ত সমাধান পায় এবং এগুলিকে একটি তালিকায় রাখে।

[: _ | আর] মাথা (খালি পরমাণু) এবং দোকানে লেজ দূরে ছোঁড়ার আর

উদাহরণ:

p('נחמן').
[נ, נח, נחמ, נחמן]

p('test').
[t, te, tes, test]

এটি এখানে অনলাইনে চেষ্টা করুন

সম্পাদনা: শুধুমাত্র লেজ মজুত করে 11 বাইট সংরক্ষিত আর



3

জিএনইউ শেড, 21

স্কোরের জন্য -Eবিকল্পগুলির জন্য +1 অন্তর্ভুক্ত রয়েছে :

:
s/^(\S+)\S/\1 &/
t

এলটিআরের পক্ষে কাজ করে তবে আরটিএল নয় - আমি কিছুটা মিস করেছি। । আসলে এটা করে কাজ, আরটিএল শুধু আমার টার্মিনাল সঠিকভাবে রেন্ডারিং করা হয় নি। এটি একটি সংবেদনশীল পাঠ্য সম্পাদক (যেমন ইম্যাকস) এ দেখানো আইওর সাথে সূক্ষ্মভাবে কাজ করে। এটি আইডিয়নেও কাজ করে:

এটি অনলাইনে চেষ্টা করুন।


3

ব্র্যাচল্যাগ , 5 বাইট (প্রতিযোগী নয়)

@[@w\

এটি অনলাইন চেষ্টা করুন!

ব্যাখ্যা

@[       Take a prefix of the input
  @w     Write this prefix to STDOUT followed by a linebreak
    \    False: try another prefix

ডান থেকে বাম স্ট্রিংগুলি সঠিকভাবে কাজ করছে বলে মনে হচ্ছে, যদিও আমি সেগুলি কখনও বিবেচনাও করি নি।


অ-প্রতিযোগিতা কেন?
অ্যাডম

@ অ্যাডাম @[এবং @wএপ্রিল / মে ২০১ after এর পরে প্রয়োজনীয়ভাবে প্রয়োগ করা হয়েছিল। গিথুব কমিটের বিষয়ে সঠিক তারিখটি কেউ খুঁজে পেতে পারেন তবে এই চ্যালেঞ্জ জমা দেওয়ার আগে অবশ্যই তা নয়।
ফ্যাটালাইজ করুন

2

সিজেম, 9 বাইট

l{N2$@+}*

আউটপুট লাইনফিড-পৃথক।

এটি এখানে পরীক্ষা করুন।

ব্যাখ্যা

l     e# Read input.
{     e# Fold this block over the input, which is effectively a foreach-loop which skips
      e# the first character...
  N   e#   Push a linefeed.
  2$  e#   Copy the previous string.
  @   e#   Pull up the current character.
  +   e#   Concatenate.
}*

আমি পুরোপুরি আশা করেছিলাম যে সিজেএম এর চেয়ে কম হবে।
টিমউই

@ টিমভি অন্তর্নির্মিত একটি "সমস্ত উপসর্গ / প্রত্যয় পাবেন" বা সাধারণীকরণের জন্য উচ্চতর অর্ডার ফাংশন নেই, সুতরাং এটি সর্বোত্তম না হলেও আমি সন্দেহ করি যে এটি উল্লেখযোগ্যভাবে পরাজিত হতে পারে।
মার্টিন এন্ডার

Ll{+_p}/;একই দৈর্ঘ্য, পোস্ট করা কারণ আমি নিশ্চিত নই যে আরও অভিজ্ঞতার সাথে আরও কেউ এটি আরও গল্ফ করতে সক্ষম হতে পারে, এবং সম্ভবত উক্ত বিষয়গুলিও ঠিক করতে পারে: পি
ফ্রাইআম দ্য এজিগম্যান 8:30

2

জাভাস্ক্রিপ্ট, 36 বাইট

x=>[...x].map((c,i)=>x.slice(0,i+1))

ডেমো:

a=x=>[...x].map((c,i)=>x.slice(0,i+1));
document.write(
  a("test")+"<br>"+
  a("נחמן")
)

নীতিটি হ'ল প্রথম চর থেকে শব্দের প্রতিটি চরকে স্ট্রিংয়ের টুকরোটি মানচিত্র করা এবং আউটপুট করা। আশ্চর্যজনকভাবে, এটি আরটিএল স্ট্রিংয়ের জন্যও পুরোপুরি কাজ করে, কোনও অপ্টিমাইজেশনের প্রয়োজন নেই।


2

আমার কনসোলটি ডান-থেকে-বাম অক্ষরগুলিকে সমর্থন করে না, তবে আমি মনে করি না এটি কার্যকর হবে: সি

সি, 74 বাইট (দ্বিতীয় প্রবেশ)

char m[2<<9];i;main(){do{m[i]=getchar();printf("%s ",m);}while(m[i++]>0);}

Ungolfed:

#include <stdio.h>

// char, because `printf("%s", str);` expects a array of characters.
char str[2<<9];
int  str_len = 0;
int main(void) {
    do {
        str[str_len]=getchar();
        printf("%s ", str);
    } while(m[i++]>0);
    return 0;
}

2

আমার কনসোলটি ডান-থেকে-বাম অক্ষরগুলিকে সমর্থন করে না, তবে আমি মনে করি না এটি কার্যকর হবে: সি

সি, 105 বাইট (3 র্থ প্রবেশ)

m[2<<9];i;j;k;main(){while((m[i++]=getchar())<0);for(;j<i;j++,putchar(10))for(k=0;k<j;k++)putchar(m[k]);}

Ungolfed:

#include <stdio.h>

int str[2<<9];
int str_len = 0;
int main(void) {
    do {
        str[str_len] = getchar();
    } while(str[str_len++] != EOF);
    int i;
    for(i=0; i<str_len; i++) {
        int j;
        for(j=0; j<i; j++) {
          putchar(str[j]);
        }
        putchar(10);
    }
}

2

টিআই-বেসিক, 18 বাইট

For(X,1,10^(9
Disp sub(Ans,1,X
End

প্রযুক্তিগতভাবে বৈধ নয়: টিআই-বেসিক ইউনিকোড সমর্থন করে না।

এটির নাম দিন prgmA, এবং ইনপুট ব্যবহার করুন Ans

প্রোগ্রাম পুনরাবৃত্তি সংক্ষিপ্ত হবে, তবে ভেরিয়েবলগুলি আরম্ভ করার কোনও উপায় থাকবে না। অতএব, আমরা প্রতিটি পুনরাবৃত্তিতে ইনপুটটির একটি স্ট্রিং প্রদর্শন করি। ইনপুট কখনই ওভাররাইট হয় না, যেহেতু ডিস্ক কোনও মান দেয় না।

শেষ পর্যন্ত, পুরো স্ট্রিংটি মুদ্রণের পরে প্রোগ্রামটি একটি ত্রুটি দিয়ে শেষ হয়।



2

জাভা 7, 95 92 বাইট

String d(String a){for(int i=a.length();i-->0;a=a.substring(0,i)+(i>0?"\n":"")+a);return a;}

পূর্ববর্তী উত্তর ( 95 বাইট ):

String c(String s){String r="";for(int i=0;++i<=s.length();r+=s.substring(0,i)+"\n");return r;}

আমি পুনরাবৃত্তির পদ্ধতির চেষ্টা করেছি, তবে আমি সত্যিই এটি কাজ করতে পারি না। সম্ভবত অন্য কেউ হবে (এই লুপ থেকে সংক্ষিপ্ত)।

অবহেলিত ও পরীক্ষার কেস:

এখানে চেষ্টা করুন।

class M{
  static String d(String a){
    for(int i = a.length(); i-- > 0; a = a.substring(0, i) + (i > 0 ? "\n" : "") + a);
    return a;
  }

  public static void main(String[] a){
    System.out.println(c("test"));
    System.out.println();
    System.out.println(c("נחמן"));
  }
}

আউটপুট:

t
te
tes
test

נ
נח
נחמ
נחמן




1

𝔼𝕊𝕄𝕚𝕟, 7 অক্ষর / 16 বাইট

ᴉⓜᵖ ᵴ˖$

Try it here (Firefox only).

এটির জন্য সম্ভবত কোথাও একটি বিল্টিন রয়েছে - আমি এটি সন্ধান করি না।

ব্যাখ্যা

ᴉⓜᵖ ᵴ˖$ // implicit: ᴉ=split input, ᵴ=empty string
ᴉⓜ      // map over ᴉ
   ᵖ ᵴ˖$ // push ᵴ+=(mapped item char)
         // implicit stack output, separated by newlines

1

জাভাস্ক্রিপ্ট ES6, 29 বাইট

(a,b='')=>[...a].map(x=>b+=x)

এটি কিছুই জিতছে না, তবে এটি একটি সহজ সমাধান।



1

পাইথন, 32 বাইট

f=lambda s:s and f(s[:-1])+" "+s

রিকার্সিভ ফাংশন যা একটি স্পেস-বিভাজিত স্ট্রিংকে একটি শীর্ষস্থানীয় স্থানের সাথে আউটপুট করে।

একটি 34-বাইট প্রোগ্রাম (পাইথন 2):

s=""
for c in input():s+=c;print s

1

ভি , 5 বাইট (প্রতিযোগী নয়)

òÄ$xh

এটি অনলাইন চেষ্টা করুন!

এই উত্তরটি প্রতিদ্বন্দ্বিতামূলক করে তোলে, এই ভাষা চ্যালেঞ্জের চেয়ে নতুন। ব্যাখ্যা:

ò       " Recursively:
 Ä      "   Duplicate this line
  $     "   Move to the end of this line
   x    "   Delete one character
    h   "   Move one character to the right, which will throw an error when the line is one character long

1

পাওয়ারশেল ভি 2 +, 28 বাইট

[char[]]$args[0]|%{($o+=$_)}

ইনপুট নেয় $args[0], এটিকে charঅ্যারে হিসাবে কাস্ট করে , অক্ষরগুলিকে একটি লুপে পাইপ দেয় |%{...}। প্রতিটি পুনরাবৃত্তি, আমরা বর্তমান অক্ষর $oমাধ্যমে জমা । এই অভিব্যক্তিটি পেরেনগুলিতে আবদ্ধ হয় তাই একটি অনুলিপি পাইপলাইনে রাখা হয়। সম্পাদন শেষে, পাইপলাইনটি ফ্লাশ করা হয় যার মাধ্যমে উপাদানগুলির মধ্যে একটি নতুন লাইন স্থাপন করা হয়।+=$_Write-Output

PS C:\Tools\Scripts\golfing> .\spell-out-the-revua "נחמן"
נ
נח
נחמ
נחמן

PS C:\Tools\Scripts\golfing> .\spell-out-the-revua "PPCG"
P
PP
PPC
PPCG


আমাদের সাইট ব্যবহার করে, আপনি স্বীকার করেছেন যে আপনি আমাদের কুকি নীতি এবং গোপনীয়তা নীতিটি পড়েছেন এবং বুঝতে পেরেছেন ।
Licensed under cc by-sa 3.0 with attribution required.