В программе описан одномерный целочисленный массив А, в представленном фрагмента...

Question

В программе описан одномерный целочисленный массив А, в представленном фрагмента программы обрабатываются элементы массива с индексами от 1 до 27.
n:=27;
A[1]:=3;
For i:= 2 to n do begin
A[i]:=3*A[i-1] mod 10;
End;
Чему будет равен элемент массива A[27] после выполнения данной программы?

Answer 1

Элементы массива будут следующими:
3, 9, 7, 1, 3, 9, 7 ,1 и т.д. Т.е. элементы с номерами 3, 7, 11, 15, 19, 23, 27 = 7
Элемент A[27]=7

Answer 2

1 3
2 9
3 7
4 1
5 3
6 9
7 7
8 1
9 3
10 9
11 7
12 1
13 3
14 9
15 7
16 1
17 3
18 9
19 7
20 1
21 3
22 9
23 7
24 1
25 3
26 9
27 7
Такой вариант если A[i]:=3*A[i-1] mod 10;

1 3
2 9
3 27
4 21
5 3
6 9
7 27
8 21
9 3
10 9
11 27
12 21
13 3
14 9
15 27
16 21
17 3
18 9
19 27
20 21
21 3
22 9
23 27
24 21
25 3
26 9
27 27
а такой если a[i] := 3 * (a[i-1] mod 10)

Comments

var a:array[1..27] of longint;
i:longint;

begin
a[1] := 3;

for i := 2 to 27 do a[i] := 3 * a[i-1] mod 10;

for i := 1 to 27 do writeln(i,' ',a[i]);

end.