Алгоритм сложив единицу саму собой затем каждый раз складывал получаемые суммы сами с собой и после 9 итерации получил число из интервала

var    i, n: integer;begin    n := 1;    for i := 1 to 9 do        n := n + n;    writeln(n);end.