int i;

int start() { 
   for(i=14;i>=0;i--) {
      Print(
         StringConcatenate(
            "Close[",i,"]  ",
            iClose("GBPCHF",PERIOD_D1,i)
         )
      );   
   }

   return(0);
}

   double x;
   for (i=0; i<ArraySize(list); i++)
   {
      symbol=list[i];
      msg="Закачивание котировок "+symbol+",M1"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M1 ,j);
      msg="Закачивание котировок "+symbol+",M5"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M5 ,j);
      msg="Закачивание котировок "+symbol+",M15"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M15,j);
      msg="Закачивание котировок "+symbol+",M30"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_M30,j);
      msg="Закачивание котировок "+symbol+",H1"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_H1 ,j);
      msg="Закачивание котировок "+symbol+",H4"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_H4 ,j);
      msg="Закачивание котировок "+symbol+",D1"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_D1 ,j);
      msg="Закачивание котировок "+symbol+",W1"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_W1 ,j);
      msg="Закачивание котировок "+symbol+",MN1"; Comment (msg);
      for (j=16383; j>=0; j--) x=iClose(symbol,PERIOD_MN1,j);
      msg="Котировки для "+symbol+" закачены"; Comment (msg);
      Sleep(750);
   }