Предмет: Информатика, автор: vova3560

помогите как это сделать в pascal ABC

Приложения:

Ответы

Автор ответа: qweretimaxismart
1

var c:integer;

begin

read(c);

write(2*c)

end.

Автор ответа: elenaklon
1

Для 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.

Интересные вопросы
Предмет: Математика, автор: kiskaaa0411
Предмет: Математика, автор: Аноним