Author Topic: путь к файлу с помощью цикла  (Read 1954 times)

0 Members and 1 Guest are viewing this topic.

Begem0t

  • Зашел в гости
  • *
  • Posts: 6
    • View Profile
путь к файлу с помощью цикла
« on: December 05, 2014, 09:32:54 PM »
подскажите как можно например подсчитать общую сумму цифр в файлах (1.txt.......90.txt) (предположим что в файле по 1 цифре)
Code: [Select]
$i0=90
while($i0>$i)
   $a=$a+tfread("\temp\" &$1&".txt",1)
print("\temp\" & $ i& ".txt") //итог \temp\&1&.txt.....\temp\&90&.txt
   inc($i)
end_cyc
print($a)
$a=$a+tfread("\temp\" & $i &".txt",1) - как правильно совместить переменную и путь?
если написать  $a=$a+tfread(("\temp\" $i".txt"),1)то будет ошибка
« Last Edit: December 05, 2014, 10:12:43 PM by Begem0t »

Oraven

  • Супермодератор
  • Герой форума
  • *
  • Posts: 3685
  • Котэ
    • View Profile
Re: путь к файлу с помощью цикла
« Reply #1 on: December 05, 2014, 10:14:15 PM »
Code: (clickermann) [Select]
FOR($a=1,$a<91) // файлы от 1 до 90
   $STR = tfread(STRCONCAT("temp\",$a,".txt"),1)
   $NUM = INT($STR)+$NUM
END_CYC

LOGWRITE ($NUM)

HALT

Begem0t

  • Зашел в гости
  • *
  • Posts: 6
    • View Profile
Re: путь к файлу с помощью цикла
« Reply #2 on: December 05, 2014, 10:19:17 PM »
Спасибо я и забыл за STRCONCAT(str1...)