Показать полную графическую версию : [решено] Как подсчитать сумму нескольких переменных
Не флужу
12-08-2009, 10:30
Не знал как правильно тему назвать :) Помогите
Предположим есть 9 переменных:
$1=1
$2=1
$3=0
$4=1
$5=0
$6=0
$7=1
$8=1
$9=1
И ещё две переменыые которые назову индекс1 и индекс2:
$index1=3
$index2=7
Как можно заставить скрипт считать сумму чисел, присвоенным переменным в диапазоне index1:index2
$vyvod=$3+$4+$5+$6+$7
Переменные заносим в массив. Потом просто делай классический цикл для суммы
Dim $c[10]
$c[1]=1
$c[2]=1
$c[3]=0
$c[4]=1
$c[5]=0
$c[6]=0
$c[7]=1
$c[8]=1
$c[9]=1
$index1 = 3
$index2 = 7
$s = 0
For $i = $index1 to $index2
$s = $s + $c[$i]
Next
MsgBox(0, '', $s)
Не флужу
12-08-2009, 11:18
Мда, надобыло сразу массив задавать... :lol:
kaster, Спасибо
Решена проблема- то :)
Переменные заносим в массив »
Необязательно:
$1 = 1
$2 = 1
$3 = 0
$4 = 1
$5 = 0
$6 = 0
$7 = 1
$8 = 1
$9 = 1
$index1 = 3
$index2 = 7
$iCalc = 0
For $i = $index1 To $index2
$iCalc += Eval($i)
Next
MsgBox(64, 'Title', $iCalc)
А тему можно назвать также как и звучит задача: «Как подсчитать сумму нескольких переменных».
Не флужу
13-08-2009, 06:24
Creat0R, Хороший код. Спасибо
© OSzone.net 2001-2012
vBulletin v3.6.4, Copyright ©2000-2025, Jelsoft Enterprises Ltd.
Available in ZeroNet 1osznRoVratMCN3bFoFpR2pSV5c9z6sTC