void __fastcall TForm1::Button1Click(TObject *Sender)
{
for(i=0;i<5;i++){
dizi=random(10);
for(j=0;j<5;j++){
if(dizi[j]==dizi)
dizi=random(10);
}
}
for(m=0;m<6;m++){
ListBox1->Items->Add(dizi[m]);
}
}
bunun neresi yanlış ya yine aynı sayıyı uretiyor..........
Amacım birbirinden farklı 5 tane sayi uretmek ve bunu bir diziye aktarmak
Randomize()
Re: Randomize()
ilk satıra randomize(); komutunu ekleyin..
yinede birbirinden kesinlikle farklı sayılar üretmek istiyorsanız, üretilen her sayı için dizi içinde kontrol yapın, sayı mevcutsa, dizinin o elemanı için yeniden bir sayı türetin..
yinede birbirinden kesinlikle farklı sayılar üretmek istiyorsanız, üretilen her sayı için dizi içinde kontrol yapın, sayı mevcutsa, dizinin o elemanı için yeniden bir sayı türetin..