<span>дают в результате нечетные числа</span>
<span><span>340547(8) x 14AC31(16) =115047 х </span><span><span>1354801</span></span><span><span>=155865790647</span></span></span>
<span><span>152643(7) x FB3071(17) =29823 x 22231445</span><span>=663008384235</span></span>
R(sqr(c)+c, d) - по тому что ты в начале указал что счетчик процедуры будет интеджером, а если вывести из коренья то может получится и дробное число...
<span>//PascalABC.NET
//Версия 3.3, сборка 1634 (14.02.2018)</span>
begin
var a:=Arr(BigInteger(ReadInteger('x->'))); var sum:=BigInteger(a[0]);
for var i:=1 to ReadInteger('n->')-1 do begin a:=a+arr(sqr(a[i-1])); sum+=a[i]; end;
a.Println; sum.Println;
end.
Пример:
x-> 4
n-> 5
4 16 256 65536 4294967296
4295033108