#include <stdio.h>
#include <math.h>
int main(void){
 long n;              /* параметр ряду */
 double dbln;         /* параметр ряду у формі з плаваючою крапкою */
 double sum=0;        /* сума членів ряду */
 double term;         /* значення поточного члена */
 const double eps=0.000001;  /* межа точності */
 long k3=1;           /* pow(3,n)*/
 short k1=1;          /* pow(-1,n)*/
   /* основний цикл; в модифікаціях обчислюються 
      наступні значення pow(2,n) і pow(-1,n)*/
   for (n=0; ; n++, k3*=3, k1=-k1) {
     /* перетворення n у форму з плаваючою крапкою */
     dbln=n;
     /* обчислення чергового члена */                     
     term=k1*(1 + 3 * dbln)/(k3);
     /* перевірка досягнення межі точності */       
     if (fabs(term)>=eps) 
        /* якщо не досягнуть - накопичення суми */ 
        sum+=term;
     /* якщо досягнуть - вихід з циклу */ 
     else break; 
     /* якщо 10 членів - виведення суми */               
     if (n==9)       
        printf("сума 10 членів ряду = %10.7lf\n",sum);
     }
   /* кінець основного циклу */
   /* виведення остаточної суми */
   printf("повна сума ряду = %10.7lf\n",sum);    
  return 0;
} /* кінець програми */
 

I2luY2x1ZGUgPHN0ZGlvLmg+CiNpbmNsdWRlIDxtYXRoLmg+CmludCBtYWluKHZvaWQpewogbG9uZyBuOyAgICAgICAgICAgICAgLyog0L/QsNGA0LDQvNC10YLRgCDRgNGP0LTRgyAqLwogZG91YmxlIGRibG47ICAgICAgICAgLyog0L/QsNGA0LDQvNC10YLRgCDRgNGP0LTRgyDRgyDRhNC+0YDQvNGWINC3INC/0LvQsNCy0LDRjtGH0L7RjiDQutGA0LDQv9C60L7RjiAqLwogZG91YmxlIHN1bT0wOyAgICAgICAgLyog0YHRg9C80LAg0YfQu9C10L3RltCyINGA0Y/QtNGDICovCiBkb3VibGUgdGVybTsgICAgICAgICAvKiDQt9C90LDRh9C10L3QvdGPINC/0L7RgtC+0YfQvdC+0LPQviDRh9C70LXQvdCwICovCiBjb25zdCBkb3VibGUgZXBzPTAuMDAwMDAxOyAgLyog0LzQtdC20LAg0YLQvtGH0L3QvtGB0YLRliAqLwogbG9uZyBrMz0xOyAgICAgICAgICAgLyogcG93KDMsbikqLwogc2hvcnQgazE9MTsgICAgICAgICAgLyogcG93KC0xLG4pKi8KICAgLyog0L7RgdC90L7QstC90LjQuSDRhtC40LrQuzsg0LIg0LzQvtC00LjRhNGW0LrQsNGG0ZbRj9GFINC+0LHRh9C40YHQu9GO0Y7RgtGM0YHRjyAKICAgICAg0L3QsNGB0YLRg9C/0L3RliDQt9C90LDRh9C10L3QvdGPIHBvdygyLG4pINGWIHBvdygtMSxuKSovCiAgIGZvciAobj0wOyA7IG4rKywgazMqPTMsIGsxPS1rMSkgewogICAgIC8qINC/0LXRgNC10YLQstC+0YDQtdC90L3RjyBuINGDINGE0L7RgNC80YMg0Lcg0L/Qu9Cw0LLQsNGO0YfQvtGOINC60YDQsNC/0LrQvtGOICovCiAgICAgZGJsbj1uOwogICAgIC8qINC+0LHRh9C40YHQu9C10L3QvdGPINGH0LXRgNCz0L7QstC+0LPQviDRh9C70LXQvdCwICovICAgICAgICAgICAgICAgICAgICAgCiAgICAgdGVybT1rMSooMSArIDMgKiBkYmxuKS8oazMpOwogICAgIC8qINC/0LXRgNC10LLRltGA0LrQsCDQtNC+0YHRj9Cz0L3QtdC90L3RjyDQvNC10LbRliDRgtC+0YfQvdC+0YHRgtGWICovICAgICAgIAogICAgIGlmIChmYWJzKHRlcm0pPj1lcHMpIAogICAgICAgIC8qINGP0LrRidC+INC90LUg0LTQvtGB0Y/Qs9C90YPRgtGMIC0g0L3QsNC60L7Qv9C40YfQtdC90L3RjyDRgdGD0LzQuCAqLyAKICAgICAgICBzdW0rPXRlcm07CiAgICAgLyog0Y/QutGJ0L4g0LTQvtGB0Y/Qs9C90YPRgtGMIC0g0LLQuNGF0ZbQtCDQtyDRhtC40LrQu9GDICovIAogICAgIGVsc2UgYnJlYWs7IAogICAgIC8qINGP0LrRidC+IDEwINGH0LvQtdC90ZbQsiAtINCy0LjQstC10LTQtdC90L3RjyDRgdGD0LzQuCAqLyAgICAgICAgICAgICAgIAogICAgIGlmIChuPT05KSAgICAgICAKICAgICAgICBwcmludGYoItGB0YPQvNCwIDEwINGH0LvQtdC90ZbQsiDRgNGP0LTRgyA9ICUxMC43bGZcbiIsc3VtKTsKICAgICB9CiAgIC8qINC60ZbQvdC10YbRjCDQvtGB0L3QvtCy0L3QvtCz0L4g0YbQuNC60LvRgyAqLwogICAvKiDQstC40LLQtdC00LXQvdC90Y8g0L7RgdGC0LDRgtC+0YfQvdC+0Zcg0YHRg9C80LggKi8KICAgcHJpbnRmKCLQv9C+0LLQvdCwINGB0YPQvNCwINGA0Y/QtNGDID0gJTEwLjdsZlxuIixzdW0pOyAgICAKICByZXR1cm4gMDsKfSAvKiDQutGW0L3QtdGG0Ywg0L/RgNC+0LPRgNCw0LzQuCAqLwo=