(16)+5 dememdeki amaç 5 ile 20 arasında bir sayı üretmek
son olarak aşağıdaki gibi bir kod yazdım ama sorun devam ediyor

<%
yemek = array ("yemek 1","yemek 2","yemek 3","yemek 4","yemek 5","yemek 6","yemek 7","yemek 8","yemek 9","yemek 10")

s=0
for i=1 to 10
	s=s+10
		if i=1 then
		s=1
		end if
			randomize()
			sayi=int((Rnd*16)+5)
			kacadet(i-1) = sayi
				for a=1 to sayi
					randomize()
					seviye=int((Rnd*11)+s*1)
					randomize()
					enerji=int((Rnd*21)+10)
					randomize()
					fiyat=int((Rnd*16)+5)
					randomize()
					cesit=int(Rnd*10)
				
					c_yemek(i-1,a-1)=yemek(cesit)
					c_yemek2(i-1,a-1,0)=seviye
					c_yemek2(i-1,a-1,1)=seviye*enerji
					c_yemek2(i-1,a-1,2)=seviye*enerji*fiyat/10
				next
			
			if i=1 then
			s=0
			end if
next

for b=1 to 10
	response.Write(b &". serinin yemekleri")
	for c=1 to kacadet(b-1)
	response.Write(c_yemek(b-1,c-1) &"<br>")
	response.Write(c_yemek2(b-1,c-1,0) &"<br>")
	response.Write(c_yemek2(b-1,c-1,1) &"<br>")
	response.Write(c_yemek2(b,c,2)&"<br><br><br>")
	next
next

%>

dizide o dan başladığını unutmuşum ilk verdiğim kodda 1 den başlatmaya çalışmışım ama 0 dan başlatsamda sorun devam ediyor