Даны натуральные числа n и k. Составить программу, выводящую на экран последовательность из n чисел, каждое из которых равно k.

program zz1;

var n, k:integer; / / задаем переменные целого типа

i:integer;

begin

write (' введите первое заданное число k '); / / вводим с клавиатуры первое число

read (k);

write (' введите второе заданное число n '); / / вводим с клавиатуры второе число

read (n);

for i: = 1 to n do / / организуем цикл на n повторений

write (' ', k); / / выводим ответ в строчку через пробел

end.