Напишите программу на языке Паскаль: Даны целые числа K и N (N >0). Вывести N раз число K. Вычисление суммы чисел от 6 до 10. прошу пожалуйста помогите

1) Программа выводит N раз число K:var k,n,i: Integer;beginwriteln('Введите k');readln(k);writeln('Введите n');readln(n);for i:=1 to n do writeln(k);end.2) Сумма чисел от 6 до 10:var a,sum: Integer;beginfor a:=6 to 10 dobeginInc(sum,a);end;writeln(sum);end.