Question

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

Answer 1

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