Б: 1; - один возможный путь из А в Б
В: 3; - возможные пути из А в В
Г: 1; - один возможный путь из А в Г
Д: 1+3=4; - т.к. в вершину Д непосредственно можно попасть только из вершин Б и В, то количество путей из А в Д будет равно сумме количеств путей из А в Б и из А в В.
Далее по такому же принципу.
Е: 3+1=4; (В+Г)
Ж: 4+3+4=11; (Д+В+Е)
З: 11+4=15; (Ж+Е)
И: 4+11=15; (Д+Ж)
К: 15+11+15=41 (И+Ж+З)
41 путь
A:=336/8=42 div - это челочисленое деление
d:= 0
Program First;
var
A, b, a, d : integer;
begin
A:= 336;
b:= 8;
a:= A div b;
d:= A mod b;
writeln(a, d);
end.
1) 34*16=544 бит (вес сообщения)
2) 12*16=192 бит (то, что приписали)
3) 544+192=736 бит (всего)
<h3>PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018</h3><h3>Внимание! Если программа не работает, обновите версию!</h3>
begin
ReadArrInteger(6).Select((v, i)-> v * (i + 1)).Println(',')
end.
<h2>Пример</h2><h3>24 -13 31 7 0 -391</h3><h3>24,-26,93,28,0,-2346</h3>
Ответ:
program SumNum;
var
i: Integer;
begin
for i := 10 to 99 do begin
if (i div 10 + i mod 10) mod 2 = 0 then
Write (i, ' ');
end;
ReadLn;
end.