Поиск результатов по фразе "Найдите 6-ой член последовательности A (i) = A (i-1) * A (i-1) 1, если А (1) = 5." (паскаль)

var ResultArray: array [1 ... 6] of integer;

var Step: integer;

begin

ResultArray[1] : = 5;

for Step : = 2 to 6 do ResultArray[Step] : = ResultArray[Step - 1] * ResultArray[Step - 1];

writeln (ResultArray[Step]);

end.

/ / В результате получается число - 2052264063