Сколько различных девятизначных комбинаций можно получить из двоек и троек?

1) 222222223
2) 222222233
3) 222222333
4) 222223333
5) 222233333
6) 222333333
7) 223333333
8)233333333
9) 333333332
10) 333333322
11) 333333222
12) 333332222
13) 333322222
14) 333222222
15) 332222222
16) 322222222
ответ: 16

Добрый день, Вас интересует что-то конкретное? Если просто изучение графики в С++, то ищите информацию в интернете. Если Вы свободно владеете английским, то ищите информацию именно на нём. А для начала я Вам предоставлю несколько полезных ссылок на авторитетных ресурсов,где можно многое почерпнуть. Я могу Вам порекомендовать только искать информацию не только на русском, но и на английском. На английском Вы найдёте больше информации и она будет более правильной и корректной. Я в процессе обучения использую только английский язык. На этом всё, удачи в обучение.

Procedure sovp;
var
  i, j, r, c: byte;
  ar: array[1..10, 1..10]of byte;
  s: array[1..4] of string;
  b: boolean;
label l1;
 begin
  r := random(2, 3);
  l1:
  c := 1;
  b := false;
  for i := 1 to 10 do
    for j := 1 to 10 do
    begin
    ar[i, j] := random(0, 1);
    if(i < 5) then s[i] := '';
    end;
     for i := 1 to 9 do
      begin
       for j := 1 to 10 do
       begin
        if(ar[i, j] <> ar[i + 1, j]) then b := true;
       end;
      if(b = false) then
     begin
      s[c] := i + ' строка совпалает с ' + (i + 1) + ' строкой';
      c := c + 1;
     end;
    b := false;
  end;
 if(c <> r) then goto l1
  else
  begin
    for var k := 1 to c do if(k<>c)then writeln(s[k]);
    for i := 1 to 10 do
    begin
      for j := 1 to 10 do write(ar[i, j], ' ');
        writeln;
    end;
  end;
   end;
 begin
  sovp;
end.