Program Task_11;
var i, n, x, result: Integer;
begin
  n := 5;
  result := 0;

  write('x = ');
  read(x);

  for i := 1 to n do
    result := result + n * (sqr(n) + x);

  write('The sum is: ');
  writeln(result);
end.