Составить программу, которая позволяет вводить с клавиатуры элементы массива a[1 ... 10] и числа k1 и k2, а затем выводит на экран в одну строку элементы массива с индексами от k1 до k2

program zz1;

var mas:array[1 ... 10] of integer; / / заводим массив для десяти чисел

i, k1, k2:integer; / / задаем переменные целого типа

begin

for i:=1 to 10 do / / вводим десять чисел с клавиатуры в массив

read (mas[i]);

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

read (k1, k2);

for i:=k1 to k2 do / / задаем цикл от первого заданного числа до второго

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

end.