Решите в паскале: мальчик продает газеты и зарабатывает на этом x рублей за первые 75 газет. на каждой из остальных проданных газет он зарабатывает по y рублей. какой будет его заработок, если он продаст 133 газеты?

Var x, y, n: integer;
begin
  readln(x);
  readln(y);
  n := 133;
  if (n > 74) then
    write(x + (n - 75)*y)
  else
    write(n*y);
  writeln(' руб.');
end.