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

var n,k,i:integer;
begin
writeln('Введите k');
readln(k);
writeln('Введите n');
readln(n);
for i:=1 to n do
write(k:2);
readln;
 
end.