problema con ciclo e ragionamento...

[henry78]

ho questo problema:

importo = 1 200 000

in questo caso il ciclo che devo fare dovrebbe stamparmi:

la prima volta 500000
la seconda volta 500000
la terza volta 200000

ed uscire...

mi riuscite ad aiutare?

ps (spero di essere stato chiaro)

[mikynetwork]

direi che non sei stato chiaro per nulla nel senso che non vedo contesti

[br1]

Una delle dozzine di soluzioni possibili...

<%
importo = 1200000
do while importo>0
	if importo >= 500000 then
		response.write "500000
"
	else
		response.write cstr(importo)&"
"
	end if
	importo = importo - 500000
loop
%>

ciao

[optime]

pure io, pure io..

<%
intero=1200000
pezzi=500000

for i=1 to fix(intero/pezzi+.9999999)
   response.write "
" & i & " :: " & pezzi - ABS((pezzi*i-intero)*((pezzi*i)>intero))
next
%>

[henry78]

risolto così:

importo = 1220543.55
importo_min = 500000

Do While importo > importo_min

MsgBox (importo_min)

importo = importo - importo_min

Loop

If importo > 0 Then

MsgBox (importo)

End If


ciao e grazie