Дан массив из N элементов(12 элементов), заданный случайным образом от -10 до 10. Вывести на экран этот массив. С клавиатуры вводятся два числа меньше N. Вывести на экран часть массива входящих в диапазон, двух введенных чисел. Эти два числа будут индексами к тем числам, которые надо вывести.

const n = 12;var a:array [1..n] of integer;      i,c,b:integer;begin  randomize;  for i:=1 to n do    begin      a[i]:=random(21)-10;      write (a[i],' ');    end;  writeln;  repeat    write ('C = ');    readln (c);  until c in [1..n];  repeat    write ('B = ');    readln (b);  until b in [1..n];  if c<b then    for i:=c to b do write (a[i],' ')  else for i:=b to c do write (a[i],' ');  readln;end.