следующая тема »

[21 Июль 2025, 12:37:24]

Новости, реклама:

[21 Июль 2025, 12:37:24]

Новости, реклама:

[Kot_dg]

сортировка рандомом  и последующий вывод

только не пойму через раз работает((((
Добавлено: [time]Sun Sep  5 20:21:36 2010[/time]void __fastcall TForm1::Button1Click(TObject *Sender)
{
 int id, i2, n2, m2;
   int mas[10], maso[4];
   for (i2 = 1; i2 <= 4; ++i2) {
      maso[i2] = i2;
   }
 // srand(time(0));
  for (i2 = 1; i2 <= 4; ++i2) {
      n2 = rand() % 4;
      m2 = rand() % 4;
      int so = maso[n2];
      maso[n2] = maso[m2];
      maso[m2] = so;

ShowMessage(maso[i2]);  // нужно чтобы было например (4,1,3,2   или 1, 4, 2,3   и, т, д)


}
}