begin process at 2010 02 09 20:27:15
  Trouver un code source :
 
dans
 
Accueil > 

Code

 > 

Maths

 > CALCULATRICE POUR POËTES

CALCULATRICE POUR POËTES


 Information sur la source

Note :
10 / 10 - par 1 personne
10,00 / 10

  • 1

  • 2

  • 3

  • 4

  • 5

  • 6

  • 7

  • 8

  • 9

  • 10
Catégorie :Maths Classé sous :calcul, maths, fantaisie Niveau :Débutant Date de création :26/01/2009 Date de mise à jour :06/02/2009 16:52:04 Vu / téléchargé :2 043 / 225

Auteur : fredelem

Ecrire un message privé
Commentaire sur cette source (24)
Ajouter un commentaire et/ou une note

 Description

      Cette calculatrice s'appelle Eunice (Encore Une Nième Insipide Calculatrice pour Enfants !). Elle peut conctionner en mode petite taille ou en mode grande taille.

     Les gens sérieux la préfèreront en mode petite taille où elle est très classique et peu encombrante. Les poètes (comme moi) la préfèreront en mode grande taille. Car dans ce mode, elle est surmontée d'un nuage qui affiche le contenu du presse papiers. Avec un traitement de texte, on peut écrire "Poëte, prends ton luth et me donne un baiser." et faire passer ce texte dans le presse-papiers. On revient ensuite à Eunice. On clique sur "Coller". Le contenu du nuage passe dans la calculatruce et on peut l'élever au carré pour voir le résultat.

    En grande taille, on peut aussi changer sa couleur. En rouge, elle évoque un ballon de plage. En rose, elle plaira aux demoiselles. Plus tard, on pourra l'avoir en tenue léopard pour les militaires.

    En grande taille un petit bouton marqué  "+" sur la droite permet d'avoir un peu d'aide sur chacune des 3 parties (boutons, fonctions, mémoires)

    Pour alterner entre les deux tailles, il faut taper Alt-F3. Du moins c'est cer que j'avais prévu mais à l'usage, elle s'est révélée plus docile et bien souvent, un simple F3 suffit.

   Si, en gande taille, on clique dans le menu principal sur "Calculatrice", on peut la déglinguer. Il est possible de supprimer la partie mémoire et la partie fonctions. On a alors une petite calculatrice toute simple. Mais on peut encore la réduire en supprimant aussi les boutons. On n'a plus que l'affichage mais on peit encore s'en servir, Si on  tape sur le clavier   (25+4)+3=  et on ontient 103.

  Si après avoir réduit la calculatrice à sa plus simple expression, on appuie sur F3, on a quelque chose de tout petit mais qui peut encore servir. Les icônes du bureau sont effacées mais elles reviennent dès qu'on ferme la calculatrice.

  On peut remettre les morceaux disparus, pas forcément dans le même ordre, ça permet de la rendre plus originale.

  Voilà, je vous laisse découvrir. Un dernier petit mot: dans les commentaires, on est prié de ne pas abuser de l'adjectif "cinglé" ni du verbe "se moquer du monde". Par contre, on peut utiliser le mot "poëte" mais il n'est pas nécesaire d'écrire les commentaires en alexandrins.

Source

  • Les source sont trop nombreuses, elles contiennent même dex fichiers .RTF Voir le .Zip
Les source sont trop nombreuses, elles contiennent même dex fichiers .RTF      Voir le .Zip

 Conclusion

Je suis ouvert à toutes les suggestions.

 Fichier Zip

Les Membres Club peuvent télécharger directement un fichier contenu dans le zip sans télécharger le zip en entier !

Télécharger le zip


 Historique

26 janvier 2009 16:43:50 :
Dans mon premier envoi, j'avais oublié 2 fichiers .bmp nécessaires pour calculer une intégrale ou un sigma
26 janvier 2009 21:18:17 :
Correction d'un gros problème qui existait sur les calculs d'intégrales ety de somme
27 janvier 2009 10:20:52 :
Correction du fait que le E n'était pas dans la même pokice de caractères que les chiffres.
29 janvier 2009 11:14:20 :
Correction de la fonction puissance dans Arithm.Pas. Il y avait une grosse erreur !
30 janvier 2009 19:44:17 :
Quelques modifs de détail.
06 février 2009 16:52:04 :
Le Zip n'était plus visible

 Sources du même auteur

Source avec Zip D7SB - UTILITAIRE DE MISE EN FORME D'UN PROGRAMME PASCAL

 Sources de la même categorie

Source avec Zip Source avec une capture CONVERTISSEUR D'UN NOMBRE DÉCIMAL EN BINAIRE ET HEXADECIMAL par ludokk
Source avec Zip Source avec une capture PREMIER OU PAS? par ludokk
Source avec Zip Source avec une capture CONJECTURE DU CARRÉ DES FACTEURS par Bacterius
Source avec Zip Source avec une capture GÉNÉRATEUR DE NOMBRES PSEUDO-ALÉATOIRES par Bacterius
Source avec Zip Source avec une capture ALGORITHME DE HASH LEA par Bacterius

 Sources en rapport avec celle ci

Source avec Zip Source avec une capture CONJECTURE DU CARRÉ DES FACTEURS par Bacterius
Source avec Zip Source avec une capture LES TOURS DE HANOÏ (( MODE GRAPHIQUE UTILISATEUR / RÉSOLUTIO... par offlake
Source avec Zip Source avec une capture APPROX'PI, OU COMMENT APPROXIMER PI AVEC LA MÉTHODE DE MONTE... par Bacterius
Source avec Zip Source avec une capture RÉSOLUTION D'UN SYSTÈME LINÉAIRE (( N ÉQUATIONS À N INCONNUS... par offlake
Source avec Zip Source avec une capture LOGICIEL DE CALCUL MENTAL ! par Bacterius

Commentaires et avis

Commentaire de lord948 le 26/01/2009 15:59:12

bonjour,
juste un truc bete, Labeldate.Caption := FormatDateTime('dddd dd mmmm  yyyy', Date) a la place de    Labeldate.Caption:=Jourssemaine[Dayofweek(Date)]+' '+Datetostr(Date);

Commentaire de fredelem le 26/01/2009 16:15:45

Ok, merci, je connaissais pas.

Commentaire de debiars87 le 26/01/2009 16:50:07

Bonjour FREDELEM !!
Votre Application ma beaucoup Aider dans le cadre d'un mini Projet !!
Même si cette Application est beaucoup Trop lourd "+ 7Secondes pour compiler"
Alors je te donne Comme Note: 10/10 je pense que tu mérite ceci!!
Debiars87

Commentaire de debiars87 le 26/01/2009 16:50:43 10/10

Oups j'ai oublier !!
10/10
Debiars87

Commentaire de fredelem le 26/01/2009 19:07:11

Sympa, merci.    
Je sais bien que ce programme est très lourd. J'ai voulu faire tout ce qui me venait à l'esprit et le résultat est un peu baroque.
Je l'ai longtemps laissé dormir et je m'aperçois qu'il m'était pas tout-à-fait fini. Quand on clique sur le sigma ou sur le symbole d'intégrale, c'est la catastrophe. Je vais essayer de réparer ça ce soir et de modifier le zip pour ne pas me faire trop enguirlander demain matin.

Commentaire de Bacterius le 26/01/2009 19:31:24

AAAH !
Inutile de faire une unité de 250 octets !
Je sais qu'il ne faut pas centraliser mais là ... oh !
Essaye de mettre les trucs qui vont ensemble, ensemble (comme CALCUL et CHIFFRES).
Tu auras déjà beaucoup moins d'unités.
Je teste et je reviens.

Cordialement, Bacterius !

Commentaire de fredelem le 26/01/2009 21:32:56

  Bien sûr, bien sür, ce programme fait un peu  désordre, je le sais bien.  Je me souviens maintenant: quand je l'ai abandonné, il y a quelque temps,je m'étais dit "Un jour, je l'enverrai mais il faudra d'abord que je corrige ceraines erreurs et que j'y mette beaucoup d'ordre". J'avais oublié. Les corrections, je viens de le faire ce soir à la hâte mais pour ce qui est de mettre de l'ordre, c'est trop tard.
  Je te fais quand même remarquer que tu emploies le mot unité pour désigner tout fichier .pas. Ce n'est pas le terme exact.

Commentaire de Caribensila le 26/01/2009 23:43:28

«Je te fais quand même remarquer que tu emploies le mot unité pour désigner tout fichier .pas. Ce n'est pas le terme exact»
- Ah bon?

...

Perso, j'ai bcp de mal à trouver la moindre trace de poésie dans tout ça.
A moins de confondre bordel et poésie...  Je ne pense pas que ça puisse aider un programmeur et encore moins un poète.
Qu'on prenne sa lyre et que l'on mette une petite jupette à l'antique avec une couronne de laurier-sauce sur la tête ne me dérange pas, sauf si c'est pour faire 'passer' et excuser toutes les maladresses. Là, ça devient de la manipulation je trouve.

Désolé d'être aussi franc, FREDELEM. Mais on ne doit pas ressentir les mêmes émotions, toi et moi.
Sois quand même le bienvenu!  :)
Perso, je dirais que tu es un original (si tu veux bien?)

Commentaire de fredelem le 27/01/2009 10:17:29

   Le mot "original" ne me déplait pas. J'avais demandé qu'on n'abuse pas du mot "cinglé". Je suis habitué à entendre les deux mots et je préfère le premier.
   Qu'est-ce que tu diras si j'envoie ma deuxième calculatrice destinée aus nombres imaginaires ! (Ceux qui ont fait une terminale scientifiques savent de quoi il s'agit)

Commentaire de Forman le 27/01/2009 16:00:53

Personnellement, la poésie du programmeur je l'ai plutôt ressentie avec ce genre de choses:
http://fr.wikipedia.org/wiki/Quine_(informatique)

As-tu fait du C auparavant? En Delphi on utilise rarement {$include ...}, ça contredit un peu le principe qui veut qu'on écrive des sources dont un autre programmeur saisit au moins la structure globale en moins d'une minute. En particulier les fichiers inclus ne sont pas visibles dans le gestionnaire de projet, et je ne vois pas trop l'intérêt de les nommer en *.pas, puisque ce ne sont pas des unités Pascal bien formées, justement. Pour qu'on s'y retrouve tu peux les nommer en *.inc par exemple (mais c'est vrai que ça ne rime pas)...

Juste une question: pourquoi tous les mots-clefs sont en majuscules, à part "Uses"? (C'est peut-être là que se situait la poésie après tout!)

À propos, tracer la fonction f(x)=x^2 bugue dans les négatifs.

Commentaire de fredelem le 27/01/2009 17:36:59


    Je retiens l'idée de nommer certains fichiers *.inc. C'est vrai que ça peut aider un peu à distinguer les sous-programmes des unités.

    J'ai un programme qui met en forme les fichiers en créant l'indentation et en mettant la plupart des mots-clefs en majuscules. Il est paramétrable mot par mot. On peut l'adapter à ses goûts.

   La fonction f(x)=x^2 provoque effectivement un message d'erreur lorsque x=0. Je dois bien reconnaître que ça, ça me chagrine davantage. Je vais y réfléchir. Curieusement si f(x)=x*x. ça se passe bien.

    

Commentaire de Bacterius le 27/01/2009 19:37:11

"Je te fais quand même remarquer que tu emploies le mot unité pour désigner tout fichier .pas. Ce n'est pas le terme exact."

Et moi je te ferais remarquer que poser une source qui contient 25 fichiers .pas de maximum 5 kilo-octets chacun, ce n'est pas une source, mais une fontaine.
Nettoie ton source d'abord :}

J'ai regardé ça d'un peu plus près : si on a défini le terme "d'unité", c'est parce que ton source doit pouvoir se loger dans une demi-douzaine d'unités maximum (peut-être plus pour une grande application, mais pas 25 (surtout pour une calculatrice !). Ici, tu mets une paire d'évènements de la fiche dans Fermer.pas, alors que tu pourrais très bien les mettre dans l'unité propriétaire de la fiche ... idem pour Horloge.pas ...

Je ne pense pas me tromper en affirmant que ta source est vraiment trop "éclatée", "dispersée", tout ce que tu veux.
Bref, centralises-moi tout ça :)

Bon voilà, c'est fini pour l'aspect "forme".
Maintenant, le "fond" :

Juste un truc bien en rapport avec la calculatrice : la plupart des calculatrices se mettent en mode degré par défaut - la tienne se met en mode radian. En voulant tester Tan(90), j'ai eu un choc en voyant un nombre numérique (la tangente de 90° en degrés est indéfinie).

Ne le prends pas mal, les commentaires sont là pour te faire progresser.

Cordialement, Bacterius !

Commentaire de ni69 le 27/01/2009 20:46:43

@Forman : Voilà un autre style de poésie informatique : http://fr.wikipedia.org/wiki/Brainfuck ^^

Commentaire de fredelem le 27/01/2009 21:47:45

    C'est toujours avec plaisir que je lis tes commentaires et ceux des autres. Aucun risque que je les prenne mal.

     Dans ce qu'on me dit, je t'avoue que ce sont surtout les bugs qui m'intéressent. tu en as trouvé un pas triste et juste avant Forman en avait trouvé un aussi. C'est d'abord ça que je vais m'efforcer de corriger.

    Mais enfin bon, les bugs, il y en a toujours, on les corrige et on n'en parle plus.

    Tes critiques rejoignent celles de Forman: Mon programme est mal composé, ce qui le rend difficile à relire pour un autre programmeur. Cette critique est presque flatteuse, ça veut dire que ce programme a quelque intérêt et que certains pourraient être tentés de l'explorer pour y trouver des idées.

     Donc, c'est sûr, il faut améliorer la forme. Tu sembles tenir à ce que je réduise le nombre de fichiers. Je veux bien mais il faut me donner une raison. J'ai réparti mes fichiers d'une façon dans laquelle je me sentais à l'aise. Et même - tu vas rigoler - je me suis demandé à un certain moment si la sagesse ne serait pas de mettre un seul sous-programme par fichier !

    Ne te fâche pas toi non plus si je te reprends à nouveau: mon programme ne contient que 2 unités. C'est le nombre de fichiers .pas qui est de 25.

    Que penses-tu de l'idée de donner à certains fichiers l'extension .inc au lieu de .pas pour distinguer les plus importants des moins importants ?

    Au plaisir de te lire. Et ne t'inquiète pas. Quoi qu'il arrive, je reste zen.

     Cordialement.        Fred.

Commentaire de Forman le 27/01/2009 21:51:25

:-)
je connaissais le brainfuck au doux nom poétique, mais en suivant ton lien j'ai découvert le Malbodge:
http://fr.wikipedia.org/wiki/Malbolge
Celui-là bat des records: les instructions à d'autres endroits du programme sont cryptées au fur et à mesure de l'exécution, c'est un cauchemar!

Commentaire de fredelem le 27/01/2009 22:02:05

    Le message de Forman est venue s'intercaler entre celui de Bactérius et le mien pendant que je rédigeaia ma réponse.
    Mon message précédent s'adressait à Bacterius. A Forman, je réponds que cette idée de recherche d'un assembleur minimum ne me laisse pas indifférent et je vais faire d'autres visites sur ce site. Mais on s'éloigne du sujet, je ne m'étends pas davantage. Merci quand même pour ce lien et pour le précédent.

Cordialement.        Fred.

Commentaire de Bacterius le 28/01/2009 12:19:05

Fredelem, ta demande de raison est justifiée mais à cela je te répondrai que pour le programmeur lambda qui lit ton source (la plupart les lisent même en ligne, donc ouvrir une page internet pour 2 procedures), il est plus facile de tout rejoindre dans deux ou trois fichiers.
D'ailleurs, la plupart du temps, on classe les fichiers par thème : par exemple, on mettra 1 fichier DFM associé à 1 seul fichier PAS. Ensuite, on mettra toutes les routines qui concernent le cryptage (dans le cadre d'une application de cryptage de fichier) dans un fichier CRYPT.PAS, et toutes les routines de décryptage dans un fichier DECRYPT.PAS, par exemple. Ca facilite à la fois la lecture, la souplesse de ton programme, et ça lui permet également d'être réutilisable facilement.

Cordialement, Bacterius !

Commentaire de Bacterius le 28/01/2009 12:21:40

Quand je dis réutilisable, c'est-à-dire que si jamais tu as une unité CRYPT.PAS et une autre DECRYPT.PAS (toujours dans le cadre d'une application de cryptage de fichier), si tu as envie de réutiliser les méthodes qui se trouvent dans ces unités dans une autre de mes applications, j'aurai juste à trouver les deux fichiers et à les copier dans mon répertoire. Avec plein de fichiers, il faudra faire le tri à chaque fois => difficile de réutiliser le programme.
Ca rejoint la théorie de la table de travail couverte de papiers : si tu veux déménager ta table, tu vas faire tomber tous les papiers - or si tu les mets tous dans un même tiroir, ça marchera !

Cordialement, Bacterius !

Commentaire de fredelem le 28/01/2009 13:46:27

  Excellente réponse. J'apprécie particulièrement la métaphore de la table couverte de papiers. Je suis maintenant bien motivé pour remettre un peu d'ordre dans mes productions.
  En ce qui concerne le bug de tg(90ª), je me suis aperçu que ce n'en était pas un. Étant donné que la calculatrice travaille en radians et que la valeur de pi/2 ne peut être écrite que d'une façon approchée, il est normal de ne pas avoir de message d'erreur. On obtient la valeur de la tangente d'un angle légèrement inférieur ou supérieur à l'angle droit. C'est un nombre énorme mais pas infini.  C'est sans doute un arrondi par excès qui fait que l'angle devient plus grand que l'angle droit et que cette valeur est négative.
   L'autre bug par contre est grave. Je prenais le logarithme d'un nombre égal à zéro et j'avais un message d'erreur. Aprés avoir corrigé (if x=0 then result:=0 et exit;, je n'ai plus de message d'erreur mais ma courbe y=x^2 fait de ces fantaisies sur le côté gauche que même un grand poëte n'apprécierait pas.
   Pour finir, je demande une faveur: que l'on m'accorde que ma calculatrice est quand même plus mignonne que celles que l'on trouve habituellement. Le souci de faire sérieux conduit parfois à faire des choses tellement sévères qu'elles sont un peu rebutantes. Avec la mienne, je pense que ce n'est pas le cas.
   La calculatrice de Windows travaille en arithmétique des entiers, ce qui est magnifique: elle permet d'avoir jusqu'à factorielle 22 et même au delà avec tous les chiffres exacts alors que la mienne arrondit à partir de 22 si je me souviens bien mais elle va beaucoup plus vite. Avec la calculatrice de Windows. tape la valeur 100 000  puis clique sur le bouton [X!]. C'est pas triste !

Commentaire de Forman le 03/07/2009 11:33:06

"tape la valeur 100 000  puis clique sur le bouton [X!]. C'est pas triste !"

Je l'avais raté celle-là   :)

Est-ce que tu as une idée du nombre d'octets nécessaires pour stocker la valeur exacte de la factorielle de 100000? (un indice: taper "formule de stirling" dans Google). On peut certainement reprocher beaucoup de choses aux appli livrées avec Windows, mais il faut quand même rester objectif!

Commentaire de fredelem le 03/07/2009 18:59:15

  Loin de moi, l'idée de décrier la calculatrice de Wimdows ! Je la trouve très réussie mais si tu fais l'expérience de lui demander la valeur de factorielle 100 000, tu verras qu'il lui faut presque 5 minutes pour trouver la réponse  (2,8242294079603478742934215780245 e+456573). C'est tout-à-fait normal puisque cette réponse contient 456 574 chiffres, comme l'indique la puissance de 10 à la fin. Alors que ma calculatrice utilise des nombres de type "extended" qui ne prennent que 10 octets !
  Mon "c'est pas triste" ne veut pas dire "c'est mauvais" mais simplement "c'est un peu long quand on a envie de voir un résultat."

Commentaire de Bacterius le 03/07/2009 19:13:30

Oui m'enfin ça n'a pas de sens de faire la factorielle de 100000, c'est tellement énorme que ça n'a absolument aucun sens ...
Sinon pour traiter les nombres gigantesques comme dans la calculatrice Windows je te renvoie à une source intéressante d'un membre du site (Caribensila) ... attends que je la trouve ...

http://www.delphifr.com/codes/CALCULS-SUR-NOMBRES-MONSTRUEUX_40193.aspx

Il traite les nombres de façon "humaine" en effectuant les étapes euclidiennes ... juste ce qu'il faut ... Mais il reste à implémenter les fonctions mathématiques plus complexes comme la factorielle par exemple (il n'y a que l'addition, la soustraction, la multiplication et la division pour l'instant). Si ça te tente Cari sera sûrement très content de t'aider.

Cordialement, Bacterius !

Commentaire de fredelem le 03/07/2009 19:37:18

   C'est une bonne idée  J'ai téléchargé ce programme sur les nombres monstrueux lorsqu'il est paru et je l'ai trouvé génial. Mais serait-ce bien utile d'ajouter cette option à ma calculatrice ? Je pense que la calculatrice de Windows serait en mesure d'afficher les 456 000 chiffres puisqu'elle les connait tous. Elle ne le fait pas, sans doute parce que personne n'en a besoin.

   Bon allez, assez parlé de cette calculatrice. Je viens de faire un autre envoi. On ne le verra peut-être que lundi. En attendant, préparez les banderilles !

Commentaire de Forman le 03/07/2009 20:37:44

A mon avis la calculette de windows calcule en valeur exacte jusqu'à un certain point, puis décide de passer en flottants lorsque le résultat dépasse un certain seuil. Ce qui explique la durée du calcul.

Ce que je voulais dire c'est que si ta calculette utilise le type extended alors ça ne doit pas être triste non plus lorsque tu lui demandes 100000! vu que la mantisse des extended va jusqu'à un peu moins de 10^5000      :-)

Au fait lorsque tu parles de préparer les banderilles, j'espère que tu n'envisages pas que l'un de nous fasse le taureau?

 Ajouter un commentaire


Discussions en rapport avec ce code source dans le forum

Calcul dans une dbgrid [ par Speedy ] Bonjour,j'ai un problème sur un DBGRID.Je veux dans un champ entrer une valeur et un calcul automatique doirt être lancé pour calculer une autre valeu Juste un petit prog de calcul [ par Cyanure ] Bonjour, Je veux faire un prog qui fera l'addition entre 3 edit et mettra la somme dans un quatrieme. Je voudrait que les 3 edit soit egal a zero au d Gros calcul [ par Manu93 ] Je cherche a faire des operations sur des grands nombres entiers ( sur 40 a 50 digits)mais comment faire sous delphi. Ex : +,-,/,*, Mod et convertion Evaluation d'une chaine de calcul [ par magicvinni ] Quelqun connait il une fonction ( ou une unité plutot) qui permettrai de faire un truc du genre function evaluation(chaine:string):integer et qui reve Optimisation [ par balgrim ] Bonjour, j'aimerais qu'on me renseigne au niveau de l'optimisation. Je n'utilise que des integer (pas de float) au max,non plus des divisions afin de Calcul avec un DBGRID [ par Fojohn ] Salut à tousJe travail avec un DBGRId qui m'affiche un champ calculé. A partir de là, j'aimerais faire la somme de champ calculé sur au moins 3 lignes recherche algorithme pour calcul de clé logicielle [ par tao ] Je suis en train de créer un permettant la création d'édition. Ce logicielle intégre la notion de droit utilisateur. Je souhaite créer un menu permett Dessiner un calcul [ par magicvinni ] Bonjour, Je recherchec un composant qui permettrai de dessiner un calcul du genre 3/5-1 sous forme de fraction.:3__ -15Merci d'avanceMagicVinni pb de calcul ... [ par etrix ] salut !voila j'ai mon calcul:with Form1 doC2.Caption:= InttoStr(strToInt(E1.Caption) / strToInt(K2.Caption) - strToInt(k1.Caption) * strToInt(100);ne pb de calcul ... [ par etrix ] salut !voila j'ai mon calcul:with Form1 doC2.Caption:= InttoStr(strToInt(E1.Caption) / strToInt(K2.Caption) - strToInt(k1.Caption) * strToInt(100);ne


Nos sponsors


Sondage...

CalendriCode

Février 2010
LMMJVSD
1234567
891011121314
15161718192021
22232425262728

Consulter la suite du CalendriCode

 
Développement réalisé par Nicolas SOREL (Nix) avec l'aide de : Cyril DURAND et Emmanuel (EBArtSoft), Merci à Vincent pour ses précieux conseils.
CodeS-SourceS.com© Toute reproduction même partielle est interdite sauf accord écrit du Webmaster
CodeS-SourceS.com© est une marque déposée tous droits réservés

Google Coop CodeS-SourceS Google Coop CodeS-SourceS
Temps d'éxécution de la page : 0,671 sec (3)

Nous contacter | Annoncer sur CodeS-SourceS | Mentions légales