Составить программу, которая запрашивает сколько раз и какое число необходимо напечатать. и выводит это число на экран заданное количество раз. в pascal

Var h, d, i: integer;
begin
write('Введите число: ');
readln(d);
write('Введите количество раз: ');
readln(h);
for i:=1 to h do
write(d, ' ');
end.