дано натуральное число n вычислить 2 n ! турбо паскаль Срочно

секунду

var n:integer;beginwriteln('Введите число');n:=здесь введи число,которое требуется умножить,после поставь;n:=n*2;writeln('Ответ', n);readln;end.

var n,x:real;beginwriteln('Введите число');readln(x);n:=n*2;writeln('Ответ', n);readln;end.