Peu etre que la question va sembler QQ




merci d avance
vince
a écrit : un porgramme "matrix" existe déjà me semble-t-il voir sur ftp.ticalc.org.....
0»key
{ª1}»ya
{}»x
While key=0
rand(20)»n
For t,1,n
ya»y
seq(ya[i]+1,i,1,dim(ya))»ya
vertel("t_draw","o",x,y,1,3,"/","t_draw","o",x,ya,1)
EndFor
rand(5)»n
dim(x)»dx
For t,1,n
rand(240)»x[dx+t]
ª10»ya[dx+t]
ya»y
seq(ya[i]+1,i,1,dim(ya))»ya
vertel("t_draw","o",x,y,1,3,"/","t_draw","o",x,ya,1)
EndFor
While ya[1]ž128
dim(x)»dx
right(x,dx-1)»x
right(y,dx-1)»y
right(ya,dx-1)»ya
ya»y
seq(ya[i]+1,i,1,dim(ya))»ya
vertel("t_draw","o",x,y,1,3,"/","t_draw","o",x,ya,1)
EndWhile
getKey()»key
EndWhile