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 ...
Convertion d'un entrier d'une base B1 vers B2 quelcinque
 
 
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 -> Algorithmes d'arithmétiques
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: Mer 19 Nov - 14:40 (2008)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

PublicitéSupprimer les publicités ?
On se propose de convertir un entier d'une base B1  à une base B2 saisie par l'utilisateur
RQ:
B1 et B2 sont compris entre 2 et 16.
Merci  Okay


Dernière édition par KARIMOS le Mer 7 Oct - 13:06 (2009); édité 1 fois
 
Revenir en haut
fathik2000


Hors ligne

Inscrit le: 04 Fév 2009
Messages: 3
Point(s): 30
Moyenne de points: 0

Posté le: Mar 10 Fév - 09:14 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

program convers;
uses wincrt;
var B1,B2:integer;
NB:string;
function base10abaseB(b,n:integer):string;
var i:integer;
s,bin:string;
r:integer;
c:char;
begin
bin:='';
repeat
r := n mod b;
n := n div b;
case r of
0..9:str(r,s);
10:s:='A';
11:s:='B';
12:s:='C';
13:s:='D';
14:s:='E';
15:s:='F';
end;
bin:=bin+s;
until ( n = 0);
for i:=1 to (length(bin) div 2) do
begin
c:=bin[i];
bin[i]:=bin[length(bin)-i+1];
bin[length(bin)-i+1]:=c;
end;

base10abaseB:=bin;
end;
function puissance(x,y : integer ):integer;
var i:integer;
p:integer;
begin
p:=1;
for i:=1 to y do
begin
p:=p*x;
end;
puissance:=p;
end;
function baseBabase10(b:integer;n:string):integer;
var
s,chinter:string;
result,e,i, x:integer;
c:char;
begin
result:=0;
for i:=1 to (length(n) ) do
begin
c:=n[i];
case c of
'0'Mad:=0;
'1'Mad:=1;
'2'Mad:=2;
'3'Mad:=3;
'4'Mad:=4;
'5'Mad:=5;
'6'Mad:=6;
'7'Mad:=7;
'8'Mad:=8;
'9'Mad:=9;
'a','A'Mad:=10;
'b','B'Mad:=11;
'c','C'Mad:=12;
'd','D'Mad:=13;
'e','E'Mad:=14;
'f','F'Mad:=15;
else writeln('nombre invalide');
end;
result:=result+(x*puissance(b,length(n)-i )) ;
end;
baseBabase10 :=result;
end;
begin
writeln('ce programme permet de converture un nombre NB d''une base B1 a une base B2');
writeln( '(2<=B1<=16) et (2<=B2<=16)');
writeln('donnez NB');
readln(NB);
writeln('donnez B1');
readln(B1);
writeln('donnez B2');
readln(B2);
writeln('(',NB,')',b1,'=(', base10abaseB(B2,baseBabase10(B1,NB)) ,')',B2 );
end.


 
Revenir en haut
samouna


Hors ligne

Inscrit le: 15 Fév 2009
Messages: 1
Masculin
Point(s): 18
Moyenne de points: 0

Posté le: Dim 15 Fév - 12:07 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

merci
c'est une solution simpe et utile


 
Revenir en haut
godofnet


Hors ligne

Inscrit le: 02 Mar 2009
Messages: 1
Masculin
Point(s): 18
Moyenne de points: 0

Posté le: Lun 2 Mar - 13:30 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

Shocked

 
Revenir en haut
ksinfo


Hors ligne

Inscrit le: 07 Mar 2009
Messages: 3
Masculin
Point(s): 40
Moyenne de points: 0

Posté le: Sam 7 Mar - 16:36 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

Mad

 
Revenir en haut
maryoum12


Hors ligne

Inscrit le: 21 Jan 2009
Messages: 1
Masculin
Point(s): 18
Moyenne de points: 0

Posté le: Jeu 12 Mar - 15:19 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

merci*

 
Revenir en haut
centpourcentjerbi


Hors ligne

Inscrit le: 01 Déc 2008
Messages: 30
Masculin
Point(s): 328
Moyenne de points: 0

Posté le: Lun 6 Avr - 20:44 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

je pence quelle est fausse
_________________
enchallah elbac fi ejjib


 
Revenir en haut
hamza rzaigui


Hors ligne

Inscrit le: 24 Avr 2009
Messages: 2
Masculin
Point(s): 19
Moyenne de points: 0

Posté le: Ven 24 Avr - 19:52 (2009)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

Shocked Shocked Shocked Shocked Shocked Shocked Shocked Shocked

 
Revenir en haut
Hallouma89


Hors ligne

Inscrit le: 25 Jan 2010
Messages: 1
Point(s): 1
Moyenne de points: 0

Posté le: Lun 25 Jan - 20:01 (2010)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

merci Smile

 
Revenir en haut
mekkaoui_rakya
recent membre
recent membre

Hors ligne

Inscrit le: 15 Jan 2010
Messages: 11
Féminin
Point(s): 11
Moyenne de points: 0

Posté le: Mer 17 Fév - 23:06 (2010)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

Okay Okay Okay Okay

 
Revenir en haut
ghada angela


Hors ligne

Inscrit le: 25 Oct 2009
Messages: 1
Point(s): 3
Moyenne de points: 0

Posté le: Dim 21 Fév - 21:45 (2010)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

ya jme3a brabi conversion de la base 16  vers 10  Question

 
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 27 Fév - 12:09 (2010)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

Bonjour,

le plus simple pour une conversion hex2dec (hexadécimal vers décimal) est de faire une étape intermédiaire en base 2 :

base 16 => base 2 => base 10

On décompose en étapes :

1) on décompose le nombre hexa en chiffre
2) On décompose chaque chiffre en base 16 en quartet (nibble en anglais : paquet de 4 bits) binaire.
3) on convertit les quartets binaires en décimal.

--------

1) 0x137 => 1 / 3 / 7

----------------
2-A) on décompose 7 :

0x07 en quartet binaire :

0 1 1 1

-----------------
2-B) on décompose 3 :

0x03 en quartet binaire :

0 0 1 1

----------------------
2-C) on décompose 1 :

0x01 en quartet binaire :

0 0 0 1

------------------------
2-D) On rassemble les quartets :

0001 0011 0111

-----------------------
3) bin2dec :

On applique les puissances de 2 à chacune des positions dans le nombre binaire (je commence à droite, par le LSB, bit de poids faible):

(N.B: j'ai laissé tombé les 0...)

1 * 2^0 = 1
1 * 2^1 = 2
1 * 2^2 = 4
...
1 * 2^4 = 16
1 * 2^5 = 32
...
1 * 2^8 = 256
...

On ajoute le tout : 256 + 32 + 16 + 4 + 2 + 1 = 311


 
Revenir en haut
nadal


Hors ligne

Inscrit le: 30 Avr 2010
Messages: 2
Point(s): 2
Moyenne de points: 0

Posté le: Mar 25 Mai - 23:34 (2010)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

Rabi nchalah tenj7o el koll fel bac , wenchalah el dawla tab3athkom lel 5arej ta9raw (el 5arej kima errdayéf wel gasrin :p ) 

 
Revenir en haut
technico


Hors ligne

Inscrit le: 21 Avr 2010
Messages: 17
Point(s): 18
Moyenne de points: 0

Posté le: Mer 26 Mai - 22:29 (2010)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque Répondre en citant

mala kiféch ... nemchiw 7atta l bni gerdene .. el  5edma  lirrjél...

 
Revenir en haut
alfa007


Hors ligne

Inscrit le: 06 Oct 2010
Messages: 1
Masculin
Point(s): 1
Moyenne de points: 0

Posté le: Mer 11 Mai - 11:52 (2011)    Sujet du message: thanks Répondre en citant

merci pour la solution 
_________________
rida abderrahmen - 4SI -lycée Ibn Sina Mahdia *2010/2011*

:p


 
Revenir en haut
Visiter le site web du posteur
Contenu Sponsorisé






Posté le: Aujourd’hui à 06:55 (2016)    Sujet du message: Convertion d'un entrier d'une base B1 vers B2 quelcinque

 
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 -> Algorithmes d'arithmétiques 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