program sdad;

var
  a, b, i, c: integer;
  sum, pro, sr: real;

begin
  sum := 0;
  pro := 1;
  sr := 0;
  c := 0;
  readln(a, b);
  
  for i := a to b do
  begin
    c := c + 1;
    sum := sum + i;
    pro := pro * i;
    sr := sr + i * i;
  end;
  sr := sr / c;
  writeln('Сумма чисел = ', sum);
  writeln('Произведение чисел = ', pro);
  writeln('Среднее арифметическое кубов = ', sr);
end.