Ответы
Ответ дал:
0
var c:integer;
begin
read(c);
write(2*c)
end.
Ответ дал:
0
Для 0 < n <= 9 (для n > 9 надо поменять тип данных переменной p)
var n,i,p:integer;
begin
p:=1;
read(n);
for i:=1 to n do p:=p*2*i;
write(p)
end.
Похожие вопросы
2 года назад
2 года назад
2 года назад
9 лет назад