паскаль.пожалуйста помогите. программирование

1)

k, n: integer;

begin

   k:=(ваше значение)

   n:=(ваше значение)

   for i:=0 to n do

       write(k);

end.

2)

a, b: integer;

begin

   a:=(ваше значение)

   b:=(ваше значение)

   for i:=a to b do

       write(i)

end.