Ответы и объяснения

2014-03-07T13:12:01+04:00
Var i, res:integer; begin; res:=1 for i:=2 to 15 do begin res:=res*i; end; write(res) end.