Ответ: 5
Выполняем построчно:
1)
a = 30
2)
a = 30
b = 6
3)
a = 8
b = 6
4)
Заходим в первый цикл
a = 8
b = 6
c = 8 - 30 + 27 = 5
101100110 будет если 358 перевести в двоичную
var a: array [1..6] of integer;
var I: integer;
begin
a[1]:=5;
for I:=2 to 6 do a[I]:=a[I-1]*a[I-1];
writeln(a[I]);
end.
Ответ -4223