procedure primeiros_multiplos(n, x: integer);
var
   i : integer;
begin
   for i := 1 to n do
      write(i * x, ' ');
   writeln;
end;
