var i, p, s: integer; begin
s:=0; p:=1; for i:=15 to 20 do
begin s:=s+i; p:=p*i; end;
writeln('s=',s);writeln('p=',p);
end.