Дан массив размера 20 и целые числа K и L. Найти сумму элементов массива с номерами от K до L включительно

var ar:array[1..20] of integer;k,l,a,b:integer;beginrandomize;readln(k);readln(l);for a:=1 to 20 doar[a]:=random(a);for a:=k to l dob:=b+ar[a];writeln(b);end.