Var
A,S:real;
i:integer;
Begin
A:=5;
S:=A;
For i:= 1 to 6 do
Begin
A:=A*1.1;
S:=S+A;
End;
WriteLn(A:0:3,' ',S:0:3)
End.
12-x=y (За x принимаем то, сколько съел Мундрунчик, а за y то, сколько осталось)
12-y=x
x+y=12
У них осталась одна коробка,,,(12 штук)
1) 2¹⁶ б = 2³ * 2¹⁶=2¹⁹ бит / 2¹°=2⁹=512 кб
2) 2¹⁶ бит / 2³ / 2¹° = 2³=8 кб
3) 2¹³ б = 2³ * 2¹³= 2¹⁶ бит / 2¹°= 2⁶= 64 кб
4) 2¹³ бит / 2³ / 2¹°= 2°=1 кб
5) 2¹° б= 2³ * 2¹°= 2¹³ / 2¹°= 2³=8 кб
6) 2¹°б=2³ * 2¹°= 2¹³ / 2¹°= 2³=8 кб
Я в этом не особый спец но я думаю что произодительность увеличится в шесть раз
A[1]=-3
A[2]=0
<span>A[3]=5
</span><span>A[4]=12
</span><span>A[5]=21
</span><span>A[6]=32
</span><span>A[7]=45</span>