Var n, s, a, p, v:integer;
begin
write('N = '); readln(n);
s:=n div (3*4*4);
a:=(n mod (3*4*4)) div (4*4);
p:=(n mod (4*4)) div 4;
v:=n mod 4;
writeln('s = ',s,' a = ',a,' p = ',p,' v = ',v);
end.
Пример:
N = 2061
s = 42 a = 2 p = 3 v = 1
Ответ:
Калибри единственная птица которая может летать задом наперед
<span>* Так как нужно найти количество последовательностей, содержащих ровно 3 буквы А, то отбрасываем А при подсчете:
3 - 1 = 2.
* Остается две буквы: Б и В, которые могут дать следующие последовательности:
ББ
БВ
ВБ
ВВ
Всего 4 последовательности, теперь составим список количества возможных последовательностей, в котором ровном 3 буквы А:
ААА**
АА**А
АА*А*
*</span>АА*<span>А
А**АА
А*А*А
А*АА*
**ААА
*А*АА
*ААА*
* Всего 10 возможных вариантов: 10 * 4 = 40 различных последовательностей, содержащих ровно 3 буквы А.</span>
Не видно. Большие фото зделай.
Получается как то так 1101000=104