var
n,ans:integer;
begin
Readln(n);ans:=1;
while n > 1 do
begin
ans:= ans * n;
n := n - 1;
end;
Writeln(ans);
end.
<span>Вот правильная последовательность:
ВБГЕДЖА</span>
1) На рисунке – схема дорог, связывающих города А, Б, В, Г, Д, Е, Ж, З, И, К. По каждой дороге можно двигаться только в одном на
veronka1 [6]
Суммируем сходящиеся стрелки и их значения
Ответ 18