Varyasyon

**CoCoRiCo** · #1 24 Şubat 2016, 09:58

Konu başlıgından da anlaşılacagı gibi bir varyasyon oluşturucu.
Amacı belirtilen kelimenin yada rakamların vasyasyonlarını olusturması.
önr:

kelimemiz "ABC"

istenen sonuç:
ABC
BAC
BCA
ACB
CAB
CBA
$variation(ABC) ve /variation ABC
ile sonuç vermelidir.

Kurallar:
17 harfden uzun kelimeyi çevirmemelidir.
10 haneli rakamdan fazlasını çevirmemelidir.
AA yada AAA gibi tekrar edenleri dönüştürmemesi.
aA gibi değerleri sorunsuz dönüştürmesi.
AAB gibi sonuçları sorunsuz döndürmesi.
Rakam ve harflerde sorunsuz çalışması.
Soket ve dışarıdan dönüşümler kabul edilmez.
com kullanımı yasaktır.
kodlar özel mesaj ile bana gönderilecektir.
en kısa kod ve en kısa sürede çalışanı kazanan kod olacaktır.
Katılım süresi 1 aydır.
bitiş süresi 31.04.2016 - 00:00

Bol şans.

Alıntı:

Çalışan kod.:

Kod:

alias variation { 
  if !$regex($1-,/(.)\1|(.){17}/) {  
    var %p 0,%c
    while ($regsub($1,/(.{ $+ %p $+ })(.)/,\1,%c)) $&
      scon -r inc $(%p |,) $iif(? iswm $1,$iif($isid,return,echo),variation %c) $2 $+ $regml(2)
  }
}

**CoCoRiCo** · #2 23 Mart 2016, 21:41

Yarışma sona ermiştir.
Bu meydan okumada herhangi bir geçerli kod yazılamamıştır.

Seçenekler
Yazdırılabilir şekli göster Sayfayı E-Mail olarak gönder