Ответы
Ответ дал:
0
Ответ:
Uses Math;
Var i,p:integer;
Sum:real;
Begin
Sum:=0;
P:=1;
For i:=1 to 12 do
Begin
P:=p*i;
Sum:=sum+p*Power(i,sqrt(i));
End;
Write(sum);
End.
Вас заинтересует
1 год назад
2 года назад
2 года назад
7 лет назад
7 лет назад
8 лет назад
8 лет назад