PureBasic

c'est pas tres tres compliqué non plus

il faut passer par le texte ! , le texte ,n'a pas de limite de longueur

et utiliser la methode "calcul a la main ! " ; si tu sais calculer une addition/division,multiplication a la main,
ben tu reproduits la meme chose avec un prg

exemple simple , ici , avec une addition

on sait qu'on ajoute les chiffres avec ceux du dessous

123
+
123
-----
246 <--- donc on pose nos chiffres et on fait pareil , on utilise une variable pour la retenue ,et c'est parti !

le code :

Code : Tout sélectionner

;***********************************************
;Titre  :*addition_grand_nombre
;Auteur  : Zorro
;Date  :21/02/2017
;Heure  :20:33:24
;Version Purebasic :  PureBasic 5.50 (Windows - x86)
;Version de l'editeur :EPB V2.64
; Libairies necessaire : Aucune 
;***********************************************


a.s="12345676546561651161651651648461321326546515133" ; autant de chiffre que tu veux
b.s="12345651313546846168431356513135468465516561" ; autant de chiffre que tu veux

retenue.s=""
rest.s=""
Resultat.s=""
al=len(a.s)
bl=len(b.s)


if al<bl:dif=bl-al:a.s=Rset(a.s,len(a.s)+dif,"0"):Endif
if bl<al:dif=al-bl:b.s=Rset(b.s,len(b.s)+dif,"0"):Endif
a.s=ReverseString(a.s)
b.s=ReverseString(b.s)

For i=1 to len(a.s)
		z1=val(mid(a.s,i,1))
		z2=val(mid(b.s,i,1))
		r=z1+z2+val(retenue.s):retenue.s="0"
		result_temp.s=str(r)
		If len(result_temp.s)>1 :retenue.s=left(result_temp.s,1):reste.s=right(result_temp.s,1):endif
		If len(result_temp.s)=1:reste.s=result_temp.s:result_temp.s="":Endif
		Resultat.s=Resultat.s+reste.s
		reste.s="":result_temp.s=""
Next i
Resultat.s=ReverseString(Resultat.s)
debug "le resultat est :" +Resultat.s

Merci pour le partage

de rien, mais c’était pas a toi de me remercier

mais a celui qui ouvre des tas de post en posant milles questions sans but,
et qui ne prends meme pas la peine de lire les réponses qu'on lui fait,
remplis de ces certitudes , il ne doute de rien, c'est même a ça qu'on le reconnais
il ne vis que par un pseudo dialogue créé de toutes pieces a travers des questions complètement aléatoires
qui lui viennent a l’esprit chaque matin, ou chaque soir,

il se demande.... que vais-je bien pouvoir poser comme question, pour avoir un semblant d’intérêt, et enfin exister
d'ailleurs, on a pas fini de répondre, que déjà un autre post est ouvert avec encore une nouvelle question , ou affirmation

bref... j'ai répondu au neant , les trous noir on les reconnaît, a leur capacité a absorber la lumière
sans rien rendre en retour , en d'autre termes , on appel ça du parasitisme ...

au fond, ça me fais bien marrer maintenant, je me rassure un peu en pensant que ce n'est pas tout a fait inutile
puisque , ça me fait réviser , et peut être que ça sert a d'autres

je prefere voir le verre a moitié plein !

Merci maitre zorro, merci !
Zapé de répondre, savais pas quoi dire aussi, mes excuses mon seigneur.

Maintenant si javais du répondre comme ça chaque fois qu'on me répondais pas.
Tu peut aller cracher ton venin ailleurs aussi !

T'es sarcasmes et t'es insulte n'ont rien à faire sur ce forum, respecte les gents
et dis toi qu'il peuvent oublier, ne pas savoir quoi répondre...

mais a celui qui ouvre des tas de post en posant milles questions sans but,
et qui ne prends meme pas la peine de lire les réponses qu'on lui fait,
remplis de ces certitudes , il ne doute de rien, c'est même a ça qu'on le reconnais
il ne vis que par un pseudo dialogue créé de toutes pieces a travers des questions complètement aléatoires
qui lui viennent a l’esprit chaque matin, ou chaque soir,

Rien que ça ?

Sans but, des questions complètement aléatoires
qui lui viennent a l’esprit chaque matin, ou chaque soir...

Je répondrais juste lol.

il se demande.... que vais-je bien pouvoir poser comme question, pour avoir un semblant d’intérêt, et enfin exister
d'ailleurs, on a pas fini de répondre, que déjà un autre post est ouvert avec encore une nouvelle question , ou affirmation

Oui oui c'est exactement ça, j'aurais pas pue être plus concis que tu viens de le faire

bref... j'ai répondu au neant , les trous noir on les reconnaît, a leur capacité a absorber la lumière
sans rien rendre en retour , en d'autre termes , on appel ça du parasitisme ...

C'est bon t'as fini ?
Va cracher ton venin ailleurs.

au fond, ça me fais bien marrer maintenant, je me rassure un peu en pensant que ce n'est pas tout a fait inutile
puisque , ça me fait réviser , et peut être que ça sert a d'autres

je prefere voir le verre a moitié plein ! Image

Enfin une phrase constructive, félicitation !

Allons allons, on se calme. Plus de relances svp.

Voici la version 1.70:
http://www.aht.li/3026431/Editeur_Dexpression.7z

Shadow a écrit :Voici la version 1.70:
http://www.aht.li/3026431/Editeur_Dexpression.7z

Pourkoi tu ne postes pas le code ??

SPH a écrit :Pourquoi tu ne postes pas le code ??

Parce que c'est une archives avec plusieurs fichiers dont des images..

Le code est beaucoup trop gros pour être posté.

Version 1.20 (ancien 1.70) terminé après un gros boulot, et c'est pas fini

Note: Les numéro de version on été corrigé pour coller mieux au programme et son avancer.
http://www.aht.li/3032738/Editeur_Dexpr ... ifusion.7z

Si vous avez des idée d’ajout ou autre, hésitez pas

Shadow a écrit :Si vous avez des idée d’ajout ou autre, hésitez pas

Utiliser des grands nombres peut etre...

PureBasic

Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression

Re: Editeur D'expression