var n, k, i:integer;begin writeln('Введи число, которое нужно выводить'); read(k); writeln('Укажи, сколько раз вывести число'); read(n); for i:=1 to n do write(k,' ');end.
var n, k, i:integer;
begin
writeln('Введи число, которое нужно выводить');
read(k);
writeln('Укажи, сколько раз вывести число');
read(n);
for i:=1 to n do
write(k,' ');
end.