Составить программу в паскале для вычисления величины S по формуле:

//PascalABC.Net 3.0, сборка 1053const  n=20;  m=15;var  i:integer;  xi,yj,s,p:real;begin  Randomize;  s:=0;  for i:=1 to n do    begin xi:=12*Random-6; s:=s+cos(sqr(xi)) end;  p:=1;  for i:=1 to m do    begin yj:=12*Random-6; p:=p*sin(yj) end;  Writeln('s=',exp(-s)+exp(p))end.  Тестовое решение:s=1.50376271681269