DrágaDb:=0 Ciklus i=1-től NapDb-ig Ha Költés[i]/T>100 akkor DrágaDb:=DrágaDb+1 Ciklus vége