hg Register Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet

Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Forum Index

hg Revision tunisie scolaire Bac Tunisie Algorithmique et programmation TIC réseaux php javascript sql access activités programmation c
hg
FAQ FAQ Search Search Memberlist Memberlist Usergroups Usergroups Profile Profile Log in to check your private messages Private Messages Log in Log in


 Forum de l'excellence et l'excellence en innovation 
Pour participer à notre Forum révision tunisie , vous devez
 inscrire sur notre forum a partir d'ici
   NB :
Les membres ''zéro messages'' seront supprimés automatiquement après un nombre de jours donné !!!!
             
   
 
  
 
forum d'aide informatique : internet, réseau, programmation informatique ...
exercice a corriger
 
 
Post new topic   Reply to topic    Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Forum Index -> Algorithmique & programmation -> Algorithmes récurrents
hg Previous topic :: Next topic   hd
Author Message
metallicoo


Offline

Joined: 16 Sep 2009
Posts: 49
Masculin
Point(s): 116
Moyenne de points: 0

Posted: Fri 4 Dec - 12:49 (2009)    Post subject: exercice a corriger Reply with quote

cc svp esque quelqu'un peut me trouver une solution pour calculer la somme des chiffres d'un entier n(la somme doit étre composer d'un seul chiffre).
exemple:N=71863 7+1+8+6+3=25
la somme =2+5=7
Shocked


 
Revenir en haut
Publicité






Posted: Fri 4 Dec - 12:49 (2009)    Post subject: Publicité

PublicitéSupprimer les publicités ?
 
Revenir en haut
bbh


Offline

Joined: 25 Nov 2008
Posts: 11
Masculin
Point(s): 39
Moyenne de points: 0

Posted: Fri 11 Dec - 01:03 (2009)    Post subject: exercice a corriger Reply with quote

metallicoo wrote:

cc svp esque quelqu'un peut me trouver une solution pour calculer la somme des chiffres d'un entier n(la somme doit étre composer d'un seul chiffre).
exemple:N=71863 7+1+8+6+3=25
la somme =2+5=7
Shocked
program somme_chiffre;
uses wincrt;
var
n:longint;

function somme(n:longint):byte;
begin
if n<10 then
somme:=n
else
somme:=(n mod 10)+somme(n div 10);
end;
begin
writeln('n=');
readln(n);
writeln('la fonction retourne:',somme(n));
end.


 
Revenir en haut
KARIMOS
Administrateur

Offline

Joined: 02 Nov 2008
Posts: 711
Masculin
Point(s): 4,448
Moyenne de points: 0

Posted: Sat 12 Dec - 09:17 (2009)    Post subject: exercice a corriger Reply with quote

Okay Okay Okay merci Okay Okay Okay bien

 
Revenir en haut
med_charfi


Offline

Joined: 17 Jan 2010
Posts: 4
Point(s): 4
Moyenne de points: 0

Posted: Tue 19 Jan - 12:06 (2010)    Post subject: exercice a corriger Reply with quote

Rolling Eyes

 
Revenir en haut
tchiunis


Offline

Joined: 07 Jan 2010
Posts: 1
Point(s): 1
Moyenne de points: 0

Posted: Sun 24 Jan - 00:53 (2010)    Post subject: exercice a corriger Reply with quote

program somme_chiffre;
uses wincrt;
var
n:longint;
x:byte;
function somme(n:longint):byte;
begin
if n<10 then
somme:=n
else
somme:=(n mod 10)+somme(n div 10);
end;
begin
writeln('n=');
readln(n);
x:=somme(n);
writeln('la fonction retourne:',somme(x));
end


 
Revenir en haut
KARIMOS
Administrateur

Offline

Joined: 02 Nov 2008
Posts: 711
Masculin
Point(s): 4,448
Moyenne de points: 0

Posted: Sun 24 Jan - 13:51 (2010)    Post subject: exercice a corriger Reply with quote

tchiunis al fin de ton  program manque point  (end . ) merci  Okay

votre program sa marche bien excellent .


 
Revenir en haut
anass002


Offline

Joined: 30 Mar 2010
Posts: 2
Point(s): 2
Moyenne de points: 0

Posted: Tue 30 Mar - 19:27 (2010)    Post subject: exercice a corriger Reply with quote

Excellent il est bien fait le programme

 
Revenir en haut
Display posts from previous:   
bg bd
Post new topic   Reply to topic    Forum révision Tunisie - Bac Tunisie Algorithmique et programmation , cours, devoir, exercice,edunet Forum Index -> Algorithmique & programmation -> Algorithmes récurrents All times are GMT + 1 Hour
 
Page 1 of 1

 
Jump to:  
Index | Make forum | Free support forum | Free forums directory | Report a violation | Cookies | Charte | Conditions générales d'utilisation