-
401.
0amk 3 ken 4 oldum yaaaa gibicem tamamen şans meselesi beyler
-
402.
0sub generationchange()
for i = 2 to 4
activesheet. cells(i, 2).value = "ne olsun bilemedim" -
403.
0sub generationchange()
for i = 4 to 3
activesheet. cells(i, 2).value = "ne olsun bilemedim" -
404.
0sub generationchange()
for i = 4 to 2
activesheet. cells(i, 2).value = "ne olsun bilemedim" -
405.
0panpa birinci nesilim ikinci nesil yap beni
sub generationchange()
for i = 4 to 3
activesheet. cells(i, 2).value = "ananin amcigi" -
406.
0Sub generationchange()
For i = 4 To 3
ActiveSheet. Cells(i, 2).Value = "tiklamayin dedeler"
edit: ohaa 4.nesildim 3. nesil oldum -
407.
0aynştayn mode on,
yalan lan bu inanm..
aynştayn mode geçersiz bir işlem yürüttü kapatılacak
aynşatyn möde öff. -
408.
0static void Main()Tümünü Göster
{
const short Boyut = 30; // değişken dizinin boyutu [0-29]
string[] Ad = new string[Boyut];
string[] Soyad = new string[Boyut];
string[] TelNo = new string[Boyut];
short Sıra; //değişken dizinin en son kayıt edilen satırı
string Seçim;
short abc1, abc2; //for dönügüsünde, sıralamak için
int ZZ; //for dönügüsünde, sıralamak için
string AA, SS, TT; //for dönügüsünde, sıralamak için
Sıra = 0; //Telefon rehberde herhangibir kayıt olmadığını göstermekte
do
{
Console. Clear();
Console. WriteLine("A-Kayıt GirişinB-Büyükten Küçüğe sıralamanC-Küçükten Büyüğe sıralamanD-Kayıtları göstermenZ-Çıkışnn");
Seçim = Console. ReadLine();
if (Seçim. Length != 1 || (Seçim != "A" && Seçim != "a" && Seçim != "B" && Seçim != "b" && Seçim != "C" && Seçim != "c" && Seçim != "D" && Seçim != "d" && Seçim != "Z" && Seçim != "z"))
{
Console. WriteLine("annHatalı girişnTekrar girinizn");
Console. Write("nnBir tuşa basınız");
Console. ReadKey();
continue;
}
else if (Seçim"Z" || Seçim
"z")
{
Console. WriteLine("anProgram Sonlandırıldı");
Console. Write("nnBir tuşa basınız");
Console. ReadKey();
break;
}
else if (Seçim"A" || Seçim
"a")
{
if (Sıra == Boyut) //31 kayıt
{
Console. Clear();
Console. WriteLine("annHafıza dolunnBir tuşa basınız");
Console. ReadKey();
continue;
}
a1:
Console. Clear();
Console. WriteLine("{0}. kayıtnn", Sıra + 1);
Console. Write("Ad: ");
Ad[Sıra] = Console. ReadLine();
Console. Write("Soyad: ");
Soyad[Sıra] = Console. ReadLine();
Console. Write("Tel No: ");
TelNo[Sıra] = Console. ReadLine();
Sıra++;
a2:
Console. Write("nnKayıta devam edilsinmi (E/H): ");
Seçim = Console. ReadLine();
if (SıraBoyut) //31 kayıt
1 && (Seçim
{
Console. Write("annHafıza dolunnBir tuşa basınız");
Console. ReadKey();
Console. Clear();
}
else if (Seçim. Length"H" || Seçim
"h"))
{
Console. Clear();
}else if (Seçim. Length1 && (Seçim
"E" || Seçim"e"))
"B" || Seçim
{
goto a1;
}
else
{
Console. Write("annHatalı girişnTekrar girinizn");
goto a2;
}
}
else if (Seçim"b")
0)
{
if (Sıra
{
Console. Write("annHafıza boşnnBir tuşa basınız");
Console. ReadKey();
Console. Clear();
continue;
}
for (abc1 = 0; abc1 < Sıra-1; abc1++)
{
for (abc2 = Convert. ToInt16(abc1+1); abc2 < Sıra; abc2++)
{
ZZ = string. Compare(Ad[abc1], Ad[abc2]);
if (ZZ == -1) //küçük ile büyük yer değiştirme
{
AA = Ad[abc1]; SS = Soyad[abc1]; TT = TelNo[abc1];
Ad[abc1] = Ad[abc2]; Soyad[abc1] = Soyad[abc2]; TelNo[abc1] = TelNo[abc2];
Ad[abc2] = AA; Soyad[abc2] = SS; TelNo[abc2] = TT;
}
}
}
Console. Clear();
Console. WriteLine("Büyükten küçüğe doğru sıralamann");
for (abc1 = 0; abc1 < Sıra; abc1++)
{
Console. WriteLine("{0}. kayıt: {1} {2} {3}", abc1 + 1,Ad[abc1],Soyad[abc1],TelNo[abc1]);
}
Console. Write("nnBir tuşa basınız");
Console. ReadKey();
}
else if (Seçim"C" || Seçim
"c")
{
if (Sıra == 0)
{
Console. Write("annHafıza boşnnBir tuşa basınız");
Console. ReadKey();
Console. Clear();
continue;
}
for (abc1 = 0; abc1 < Sıra - 1; abc1++)
{
for (abc2 = Convert. ToInt16(abc1 + 1); abc2 < Sıra; abc2++)
{
ZZ = string. Compare(Ad[abc1], Ad[abc2]);
if (ZZ == 1) //büyük ile küçük yer değiştirme
{
AA = Ad[abc1]; SS = Soyad[abc1]; TT = TelNo[abc1];
Ad[abc1] = Ad[abc2]; Soyad[abc1] = Soyad[abc2]; TelNo[abc1] = TelNo[abc2];
Ad[abc2] = AA; Soyad[abc2] = SS; TelNo[abc2] = TT;
}
}
}
Console. Clear();
Console. WriteLine("Küçüten Büyüğe doğru sıralamann");
for (abc1 = 0; abc1 < Sıra; abc1++)
{
Console. WriteLine("{0}. kayıt: {1} {2} {3}", abc1 + 1, Ad[abc1], Soyad[abc1], TelNo[abc1]);
}
Console. Write("nnBir tuşa basınız");
Console. ReadKey();
}
else if (Seçim"D" || Seçim
"d"){
if (Sıra == 0)
{
Console. Write("annHafıza boşnnBir tuşa basınız");
Console. ReadKey();
Console. Clear();
continue;
}
for (abc1 = 0; abc1 < Sıra; abc1++)
{
Console. WriteLine("{0}. kayıt: {1} {2} {3}", abc1 + 1, Ad[abc1], Soyad[abc1], TelNo[abc1]);
}
Console. Write("nnBir tuşa basınız");
Console. ReadKey();
}
} while (Sıra == Sıra); //Kısır döngü
}
OLDU MU PANPALAR ??? -
409.
0Sub generationchange()
For i = 1 To 4
ActiveSheet. Cells(i, 2).Value = "ucanadamsabri54"
edit: dötüncü oldum bin -
410.
0haha şukunu verdim lan.. harbiden oldu.
-
411.
0ub generationchange()
for i = 1 to 4
activesheet. cells(i, 2).value = "beckh" -
412.
0Sub generationchange()
For i = 4 To 2
ActiveSheet. Cells(i, 2).Value = "adaminaminakoyarim" -
413.
0Sub generationchange()
For i = 4 To 2
ActiveSheet. Cells(i, 2).Value = "adaminaminakoyarim" -
414.
0Sub generationchange()
For i = 4 To 2
ActiveSheet. Cells(i, 2).Value = "halter kaldiran solucan" -
415.
0başlığı okumam bile yetti vay ak
-
416.
0sub generationchange()
for i = 4 to 2
activesheet. cells(i, 2).value = "isimbulamadimaq" -
417.
0Sub generationchange()
For i = 4 To 2
ActiveSheet. Cells(i, 2).Value = "ccc yapay dol ccc" -
418.
0sub generationchange()
for i = 4 to 3
activesheet. cells(i, 2).value =kolanyayla 31 -
419.
0sub generationchange()
for i = 3 to 0
activesheet. cells(i, 2).value = "ucanfil"
edit:sözlükten atıldım bin -
420.
0sub generationchange()
for i = 4 to 3
activesheet. cells(i, 2).value ="kolanyayla 31"
-
instagram tiktok twitter alayının amg
-
wow girl sesin çok çıkmasınn
-
olum bu sözlükte ne değişik adamlar var lan
-
öz anasının zütünü yatarken çekmiş
-
wow girl kiziniz olabilirdi
-
bu karı önünüze domallsa
-
gay pataklayan senin derini yüzdürüp
-
burdaki pek cok kişi
-
wow girl olarak 20 ocakta diktirme
-
39 yaşındayım hala 31 çekiyorum bakirim
-
wow girl olarak 560bin tl
-
45 tane ermeniyi geberten babayiğit
-
dünyada en çok 31 çekilen ülke
-
wow girl bu adam hakkında ne düşünüyorsun
-
zalinazurtt annene arkadaan
-
züt kanseri olsanız makatınizdan
-
aylar geçti halen aklımdan çıkmıyor
-
ccc rammstein ccc günaydın diler 15 01 2025
-
beyler whatsap ve insta fotomu ne yapsam
-
beyler 560 kez sex yaptım ve bankada
-
wow girl olarak bekaretim ssli
-
cccrammsteinccc gran torino gwynplaine adlı
-
beyler putu acaba neden beni terketti
-
tokmakçım olur musun
-
özgür özel iktidara kırmızı kart gösterdi
-
kafkas man seni kafes dövüşüne davet
-
eski sevgilim putu beni terkettiğinden beri
-
hey incici oç
-
googleda yandexi aratınca
-
ferrelardaki karilar birilerinin kizi ve bacisi
- / 2