Чтобы попасть в точку К, надо попасть в точки Е, В, Г, Ж.
В точку Е есть 3 путя.
В точку В - 2.
В точку Г - 2.
В Ж - 2.
Суммируем: 3+2+2+2=9 путей.
Ответ: 9.
Var N, S: integer
BEGIN
write ('Vvedite N'); readln (N);
S := 0;
while N > 0 do
begin
N := N mod 10;
S := S + 1;
end
writeln (S);
if S mod 9 = 0 then writeln (N, 'kratno 9') else writeln (N, 'ne kratno 9');
END.
Иголка- один из важных элементов не только матричного принтера
Begin
var n := readinteger('Введите n:');
var m := readinteger('Введите m:');
write(readarrinteger(10).Where(x -> (x > n) and (x < m)).count);
end.