hg S’enregistrer Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie

Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie  forum informatique Tunisie Index du Forum

hg Bac Tunisie Algorithmique et programmation TIC réseaux php javascript sql access activités programmation c
hg
FAQ FAQ Rechercher Rechercher Membres Membres Groupes Groupes Profil Profil Se connecter pour vérifier ses messages privés Messages Privés Connexion Connexion


 Forum de l'excellence et l'excellence en innovation 
Pour participer à notre Forum, 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 ...
Correction Devoir Controle n°2 4 Maths 4 07-08
 
 
Poster un nouveau sujet   Répondre au sujet    Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie Index du Forum -> Algorithmique & programmation -> (¯`·._.·[Devoirs et séries']·._.·´¯)
hg Sujet précédent :: Sujet suivant   hd
Auteur Message
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Sam 29 Nov - 13:46 (2008)    Sujet du message: Correction Devoir Controle n°2 4 Maths 4 07-08 Répondre en citant

PublicitéSupprimer les publicités ?






3. Traduction Pascal

{Calcul des termes de la suite de fibonacci}

program fibonacci;
uses wincrt;
type
suite_u = array[1..27] of integer;
var
u:suite_u;
n,i:integer;

begin
{saisie de n}
Repeat
write('Donner n :');
readln(n);
Until n in [3..27];


{initialisation des termes U1 et U2 de la suite}
u[1]:=1;
u[2]:=2;

{affichage de U1 et U2}
writeln('n= 1 Un= ',u[1]);
write('n= 2 Un= ',u[2],' ');

{affichage du terme V2}
writeln('Vn= ',u[2]/u[1]:2:7);

{calcul et affichage des termes Un et Vn avec i commençant par 3}
for i:=3 to n do
begin
u:=u+u;
writeln('n= ',i,' Un= ',u,' Vn= ',u/u:2:7);
end;
end.


 
Revenir en haut
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Mar 31 Aoû - 08:43 (2010)    Sujet du message: Correction Devoir Controle n°2 4 Maths 4 07-08 Répondre en citant

Okay

 
Revenir en haut
r.nsiri
recent membre
recent membre

Hors ligne

Inscrit le: 09 Jan 2009
Messages: 262
Masculin
Point(s): 304
Moyenne de points: 0

Posté le: Mer 8 Sep - 13:19 (2010)    Sujet du message: Correction Devoir Controle n°2 4 Maths 4 07-08 Répondre en citant

Okay Okay Okay Okay Okay Okay
_________________
Cordialement


 
Revenir en haut
KARIMOS
Administrateur

Hors ligne

Inscrit le: 02 Nov 2008
Messages: 1 710
Masculin
Point(s): 5 479
Moyenne de points: 0

Posté le: Sam 11 Sep - 12:52 (2010)    Sujet du message: Correction Devoir Controle n°2 4 Maths 4 07-08 Répondre en citant

en avance inchallah 

 
Revenir en haut
Contenu Sponsorisé






Posté le: Aujourd’hui à 11:26 (2016)    Sujet du message: Correction Devoir Controle n°2 4 Maths 4 07-08

 
Revenir en haut
Montrer les messages depuis:   
bg bd
Poster un nouveau sujet   Répondre au sujet    Bac Tunisie Algorithmique et programmation : BAC INFORMATIQUE En Tunisie forum informatique Tunisie Index du Forum -> Algorithmique & programmation -> (¯`·._.·[Devoirs et séries']·._.·´¯) Toutes les heures sont au format GMT + 1 Heure
 
Page 1 sur 1

 
Sauter vers:  
Index | créer forum gratuit | Forum gratuit d’entraide | Annuaire des forums gratuits | Signaler une violation | Conditions générales d'utilisation