FlashBang F FlashBang Регистрация 18 Ноя 2013 Сообщения 92 Репутация 0 Спасибо 0 Монет 0 19 Янв 2017 #1 s:=0; for i:=1 to 10 do s1:=0; i1:=i*i*i; for k:=1 to 5 do s1:=s1+sqrt(i-k); s:=s+i1*s1;