Döngü Hakkında [YARDIM]
-
Arkadaşlar öyle bi kod yazmam lazım ki
aaaa
...
zzzzarası bütün harfleri tek tek sıralamalı.
Yani;
aaaa
aaab
aaac
.....
zzzx
zzzy
zzzzAsp'de veya C#'ta olabilir. Yardıma ihtiyacım var.
-
hocam işine yararmı bilmem ama;
harflerin ascii tablosundaki karşılıklarını kullanarak bi döngü kurabilirsin gibi geldi bana
-
abcdefghijklmnopqrstuvwxyz
bi fonksiyon tanımla. içerisinde bi değişkene bunu ata.
sonra mid kullanarak döngüye sok.
kafamda tasarladım tabi bunu ama uygulayıp eklerim birazdan :)
-
bekliyorum :)
-
26 harf var. 26nın 4lü alt kümeleri => 26^4 = 456976
Koda sayaç ekledim birde doğruluğunu kontrol etmek için :)
------------------------
<%
Function fncHarf(Sira)
strKarakterler="abcdefghijklmnopqrstuvwxyz"
fncHarf=Mid(strKarakterler,Sira,1)
End Function
intSayac=0
For Yanyana1=1 To 26
For Yanyana2=1 To 26
For Yanyana3=1 To 26
For Yanyana4=1 To 26
Response.Write fncHarf(Yanyana1)&fncHarf(Yanyana2)&fncHarf(Yanyana3)&fncHarf(Yanyana4)&"<br>"&vbNewLine
intSayac=intSayac+1
Next
Next
Next
Next
Response.Write "<br><span style=""font-size:18px;color:#ff0000;"">"&intSayac&" sonuç bulundu.</span>"
%>------------------------
-
bu arada döngüleride toplu bir döngüye sokmadım ama birazdan uğraşırım onun için :) ilk mesajımda bahsettiğimle uzaktan yakından alakası yok yani :D
-
for (int i = 97; i < 123; i++)
{
for (int j = 97; j < 123; j++)
{
for (int k = 97; k < 123; k++)
{
for (int m = 97; m < 123; m++)
{
Console.WriteLine((char)(i)+""+(char)(j)+""+(char)(k)+""+(char)(m));
}
}
}
}ASCII tablosunda küçük a=97, küçük z=122. Bu sayı değerlerini char'a çeviriyoruz.
-
hacı bütün harfleri bi array e dizeceksin...
başlıcaksın döngüye....
arrayın adı harfler olsun... sonuna da bi karakter koy bu durdurucu eleman olucak bizim...
mesela
....u,y.z,stopper)
'bunlar ilk karakter için olanlar... digeğlerini iç içe döngüyle yazıcaz... sen 3 karakter demiştin ona gore yapıyorum...
f = 0
s = 0
t = 0
firstletter = split(harfler , f )
'ikinci karakter... arrayın ilk karakterine eşitliyoruz...
secondletter = split(harfler , s)
'üçünyüyü de...
thridletter = split(harfler , t )
'durdurucu karakter ( biz ona stopper dedik yukarda )
finishletter = split(harfler ,29)
do until firstletter = finishletter
response.write(fisrtletter)
if secondletter = finishletter then
f = f + 1
fisrtletter = split(harfler , f )
secondletter = split(harfler , 0 )
thirdletter = split(harfler , 0 )
end if
response.write(secondletter)
if thirdletter = finishletter then
s = s + 1
secondletter = split(harfler , s )
thirdletter = split(harfler , 0 )
end if
response.write(thirdletter)
t = t + 1
thirdletter = split(harfler , t )
loop
şimdi yazdım denemedim ama olur yüksek ihtimale :)
-
teşekkür ediyorum :)
-
Dakikalar içinde cevap hazır :)
-
çalıştı mı?
