Turbo pascal

Discutez d'informatique ici !
Ptiboudelard
Membre Relatif
Messages: 303
Enregistré le: 31 Déc 2008, 08:43

Turbo pascal

par Ptiboudelard » 13 Jan 2009, 21:06

Bonsoir !


Quelqu'un saurait il comment écrit une puissance en turbo pascal du genre (1/2)^n ?

Je ne connais pas l'instruction permettant d'afficher les puissances

Merci !



barbu23
Membre Transcendant
Messages: 5466
Enregistré le: 18 Fév 2007, 17:04

par barbu23 » 13 Jan 2009, 21:11

Salut :
Voiçi comment on l'écrit en turbo pascal :
for i := 1 to n do
s := 1/2;
s := 1/2 * s
:happy2:

Ptiboudelard
Membre Relatif
Messages: 303
Enregistré le: 31 Déc 2008, 08:43

par Ptiboudelard » 13 Jan 2009, 21:12

d'aaaaaaccord ! lol il n'existe donc pas d'instruction à proprement parler ?


merci encore !

Avatar de l’utilisateur
fatal_error
Membre Légendaire
Messages: 6610
Enregistré le: 22 Nov 2007, 12:00

par fatal_error » 13 Jan 2009, 22:04

salut,

une astuce foireuse :
a^b=exp(b*ln(a))

exp et ln existent en pascal, donc j'imagine en turbo pascal aussi
la vie est une fête :)

Ptiboudelard
Membre Relatif
Messages: 303
Enregistré le: 31 Déc 2008, 08:43

par Ptiboudelard » 13 Jan 2009, 22:15

mdr ... moui pour exp ça existe. Je ne sais pas si ln existe aussi. En revanche, je vais éviter ce genre de combine, car je fais ça dans l'optique d'un concours ( je suis en CPGE ECE ). Donc j'imagine que ça ne fera pas partie des points valorisés si je mets ça ! lol

Néanmoins c'est correct !!! Merci en tous cas !

rincewind
Messages: 2
Enregistré le: 14 Jan 2009, 16:21

par rincewind » 14 Jan 2009, 17:21

si tu n'as pas droit à cette astuce code ta propre fonction (désolé ma syntaxe du pascal est trop rouillée j'écris en langage algorithmique simple)

pour ça tu as deux solutions :

la boucle for indiquée au dessus :

Code: Tout sélectionner
fonction puissance(nbr,exp)
si exp=0
  return 1
sinon
  resultat=nbr
  pour i de 1 à exp-1
    resultat=resultat*nbr
  return resultat


et tu as aussi la méthode récursive qui impressionne toujours :ptdr:

Code: Tout sélectionner
fonction puissance(nbr,exp)
si exp=0
 return 1
sinon si exp=1
 return nbr
sinon
 return nbr*puissance(nbr,n-1)

Ptiboudelard
Membre Relatif
Messages: 303
Enregistré le: 31 Déc 2008, 08:43

par Ptiboudelard » 14 Jan 2009, 19:44

merci merci ! On a corrigé aujourd'hui l'exercice que j'avais à faire, et j'avais tout bon ^^ on l'a testé sur l'ordi et ca a fonctionné! :-D

anais10
Membre Naturel
Messages: 13
Enregistré le: 01 Jan 2011, 14:46

par anais10 » 01 Jan 2011, 16:43

Je reprends ce vieux topic !
Comment on écrit ln en pascal ?

Avatar de l’utilisateur
fatal_error
Membre Légendaire
Messages: 6610
Enregistré le: 22 Nov 2007, 12:00

par fatal_error » 01 Jan 2011, 17:44

avec log...probablement
la vie est une fête :)

 

Retourner vers ϟ Informatique

Qui est en ligne

Utilisateurs parcourant ce forum : Aucun utilisateur enregistré et 6 invités

Tu pars déja ?



Fais toi aider gratuitement sur Maths-forum !

Créé un compte en 1 minute et pose ta question dans le forum ;-)
Inscription gratuite

Identification

Pas encore inscrit ?

Ou identifiez-vous :

Inscription gratuite