Даны целые числа K и N (N > 0). Вывести N раз число K — Pascal(Паскаль)

program f1;
var K, N, i: integer;
begin
    read(K, N);
    for i := 1 to N 
        do write(K, ' ');
end.