0 Members and 3 Guests are viewing this topic.
:"prgmNOUVEAU"→Str1:UnArchive Str1:!If GetCalc(Str1)→P:GetCalc(Str1,500)→P:End:Fill(P,500,ᴱ29):input→A:Copy(A,P,length(A))