Помогите пожалуйста составить программу паскаля
Дан ряд чисел 5 9 13 17 и т. д. составить программу которая находит элемент стоящий на 20 месте

//PascalABC.NET 3.1 сборка 1219begin    var a := Range(1, 20).Aggregate(5, (s, x)-> s + 4);     PrintLn(a);end.или более сложноconst    n = 20;var    i, a: integer;begin    a := 5;    for i := 2 to 20 do        a := a + 4;    writeln(a);    end.