Алфавит у нас состоит из трех букв (Б,У,М). Длина ряда 4 буквы. Количество возможных слов вычисляется по формуле N^m(н в степени м), где N - это длина алфавита, а m - длина ряда. Получаем 3^4=81. Дальше нужно исключить случаи, когда Есть три идущие буквы подряд, рассмотрим все случаи. 1.Когда все буквы в слове одинаковые (, , ); 2.Когда есть три буквы одинаковые (БББУ,УБББ,БББМ,МБББ, БУУУ,УУУБ,МУУУ,УУУМ,МММБ,БМММ,УМММ,МММУ.). Тобишь всего исключений 12+3=15. Вычитаем из количества всех вариантов 81-15=66. ответ:66 различных слов.
var ar: array of array of integer; n, m, i, j: integer;
begin read(n, m); setlength(ar, n); for i := 0 to n - 1 do setlength(ar[i], m); writeln('Enter matrix:'); for i := 0 to n - 1 do begin writeln; for j := 0 to m - 1 do read(ar[i, j]); end; writeln; writeln('First matrix:'); for i := 0 to n - 1 do begin writeln; for j := 0 to m - 1 do write(ar[i, j]:4); end; writeln; writeln('Final matrix:'); for i := 0 to n - 1 do begin writeln; for j := 0 to m - 1 do begin if ar[i, j] mod 2 = 0 then ar[i, j] := ar[i, j] div 2; write(ar[i, j]:4); end; end; end.
1.Когда все буквы в слове одинаковые (, , );
2.Когда есть три буквы одинаковые (БББУ,УБББ,БББМ,МБББ, БУУУ,УУУБ,МУУУ,УУУМ,МММБ,БМММ,УМММ,МММУ.).
Тобишь всего исключений 12+3=15.
Вычитаем из количества всех вариантов 81-15=66.
ответ:66 различных слов.