Problème pascal

Fermé
mimi2316 Messages postés 5 Date d'inscription jeudi 3 mai 2007 Statut Membre Dernière intervention 12 avril 2008 - 11 févr. 2008 à 10:11
ballackacem Messages postés 58 Date d'inscription mardi 26 juin 2007 Statut Membre Dernière intervention 23 juin 2009 - 16 févr. 2008 à 12:20
Bonjour,
la légende raconte que le brahmane Sessa ayant inventé le jeu d’échec,
Le roi en fut tant émerveillé qu'il lui proposa de choisir la récompense qu’il souhaitait.
Le Brahmane demanda alors la quantité de grains de blé qu’il serait nécessaire pour remplir les 64
cases d’un échiquier en respectant la condition suivante, chaque case doit contenir deux fois plus
de grains de blé que la précédente sachant que la première case ne contient qu’un seul grain.
Soit : 1 grain de blé sur la première case
2 grains sur la seconde
4 grains (soit 2 fois 2) sur la troisième
8 grains (2 fois 2 fois 2) sur la quatrième
16 grains (2 fois 2 fois 2 fois 2) sur la cinquième etc ...
la formule est 1+ 2 + 2¨2 + 2¨3 +...+ 2¨n-1
si un grain de blé pèse 0.5 gramme ,exprimez le résultat en mesure de poids
comment faire le programme en pascal ?
merci d'avance.
A voir également:

1 réponse

ballackacem Messages postés 58 Date d'inscription mardi 26 juin 2007 Statut Membre Dernière intervention 23 juin 2009 2
16 févr. 2008 à 12:20
Program brahmane ;

var i ,poids,combien,:integer ;

begin

combien:=0;

i:=0;

//.....il y a 64 cases donc tu compte de 0 a 63 car 1 =2puissance 0 dans la premiere case et dans la derniere est 2 //puissance 63

while(i<=63) do .
begin

combien:=combien+(2^ i) ;........si j'ai pas oublié x puissance y en pascal s'ecrit x^y .
i:=i+1;
end;

poids=combien * 0.5;

wreiteln(poids);

end.

je pense que le nombre 2 puissance i avec i>10 sont plus grandes et je pense pas qu'un logiciel comme le pascal peut calculer ces nombres géantes ; il y a des logiciels mathématiques qui sont spécialisé pour ça comme le maple ou le matlab .
je te donne un exemple si tu calcule le factoriel de 16 en pascal , il ne donne pas résultat il bloque mais en maple par exemple il peut calculer le factoriel de 100.

cordialement et amicalement
0