Даны целые числа K>0 и N (N = K+5). Вывести N раз число K.

Question

Даны целые числа K>0 и N (N = K+5). Вывести N раз число K.

Answer 1

Program n1;
var n,k,i: integer;
begin
readln(k);
n:=k+5;
for i:=1 to n do writeln(k);
end.

Comments

А как через оператор while будет?