Правильный ответ 12,сама проходила это
var a,s,i:integer;beginrandomize;s:=0;for i:=1 to 15 dobegina:=random(100);s:=s+a;end;write('s=',s);end.