Объяснение:
во вложениях..
^ не ставится, но действие выполняется, у себя ставьте!
Var n,f,i: integer;
begin
write('n = ');
readln(n);
f:=1;
for i:=1 to n do f:=f*i;
writeln(n,'! = ',f);
end.
Пример:
<span>n = 6
6! = 720</span>
120*120*log8=120*120*3=43200bit=5400bite=5.2734375kb
1024×400=409600 байт
409600÷50=8192байта/с
8192×30=245760байт=240Кбайт
For i=1 to 15
input a
s=s+a
next
? s