генерация чисел(перебор)

[Horus92]

Подскажите пожалуйста как реализовать перебор цифр от 0 до 9 допустим в 10 значном числе.Типа выдать все возможные варианты 10 чисел с цифрами от 0 до 9. и как до этого посчитать кол-во возможных вариантов.

[chertovich]

procedure TForm1.Button1Click(Sender: TObject);
var
  Chislo: String;
  I: Integer;
begin
  Randomize;
  Chislo := '';
  for I := 1 to 10 do
  begin
    Chislo := Chislo + IntToStr(Random(10));
  end;
  ShowMessage(Chislo);
end;

количество вариантов 10 в 10 степени, по-моему так...

[mutabor]

Перебор - это когда 22

А если серьезно, то 10 в 10-й, да. Перебрать в цикле любом, пока не дойдет до 10 в 10-й, при выводе число форматируй, чтобы начальные нули не отбрасывались.