Var y, i, n: integer;
begin
writeln('Введи n');
readln(n);
y := 1;
for i := 1 to n do
y := y *( 2 * i);
writeln(y);
<span>end.</span>
Ошибка в написании формулы, в зависимости от того, что ты делала
// PascalABC.NET 3.1, сборка 1218 от 12.04.2016
begin
var n:=ReadInteger('n=');
var s:=BigInteger(0);
var p:=Biginteger(1);
for var i:=1 to n do begin p*=i; s+=p end;
Print(s)
end.
Тестовые решения
n= 5
153
n= 10
4037913
n= 50
31035053229546199656252032972759319953190362094566672920420940313
М = 1000
D=500
С=100
L=50
Х=10
MCXLVII = 1000+100+40+7=1147
MDCCCXII = 1000+500+300+12=1812
MCMXLV =1000+900+40+5= 1945
MMXIV = 2000+10+4=2014
Явно зашифрованы знаменательные даты: 1147 г - первое упоминание о Москве
1812 - война с Наполеоном
1945 - победа в Великой Отечественной войне
Переведем А7^16 и 100^3 в десятеричную. А^16 = 10 следовательно, А7^16 = (10*16^1)+(7*16^0)=167 100^3=(1*3^2)+(0*3^1)+(0*3^0)=9 значит, у Людочки на 9 меньше , чем у Эллочки. Отсюда получаем 167-9=158 (это мы получили в десятеричной) далее просто переводим в нужную систему счисления. 10011110^2 236^8 9Е<span>^16</span>