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 ...
Codage, chiffrement d'un texte
 
 
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: Ven 19 Fév - 22:07 (2010)    Sujet du message: Codage, chiffrement d'un texte Répondre en citant

PublicitéSupprimer les publicités ?
Problème (CODAGE D'UN TEXTE)

Une manière de coder un texte consiste en l'opération suivante. On se fixe un entier n donné. On considère que le texte à coder est une chaîne de caractères. En commençant à partir du premier caractère, on divise le
texte en blocs de longueur n2 (nxn) caractères consécutifs. Si la longueur du texte n'est pas un multiple de n2, on lui ajoute autant d'espaces qu'il en faut pour que sa longueur devienne un multiple de n2. Chaque bloc est divisé à son tour en n sous-blocs de longueur n caractères. En disposant ces sous-blocs l'un en dessous de l'autre, on obtient alors n colonnes. Chaque colonne, lue du haut vers le bas, va donner une chaîne de n caractères. En rassemblant dans l'ordre toutes ces chaînes, on obtient une nouvelle chaîne qui sera le texte codé.


Exemple :
Pour n = 3 et le texte à coder ="Je vais à Tunis pour l'OTI"
La longueur de ce texte est égale à 26. On lui ajoute 1 espace pour que sa longueur devienne multiple de 9. La chaîne devient "Je vais à Tunis pour l'OTI" Sa longueur devient donc 27.

En appliquant les étapes ci-dessus évoquées, on obtient :


J

e




T

u


u

r


v

a

i


n

i

s


l

'

O

s


à



p

o


T

I



La chaîne codée sera :
Jvsea ià n TipusoulTr'I O "


Écrire un programme qui saisit un entier naturel n tel que 2<9 et le texte à coder (une chaîne de caractères). Il fait sortir ensuite le texte codé.





Dernière édition par KARIMOS le Dim 25 Avr - 20:27 (2010); édité 1 fois
 
Revenir en haut
anisagrebi


Hors ligne

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

Posté le: Jeu 22 Avr - 12:31 (2010)    Sujet du message: Codage, chiffrement d'un texte Répondre en citant

   veuillez heberger  les fichiers dans un autre site

 
Revenir en haut
azerty


Hors ligne

Inscrit le: 19 Jan 2010
Messages: 6
Point(s): 7
Moyenne de points: 0

Posté le: Dim 25 Avr - 20:02 (2010)    Sujet du message: Codage, chiffrement d'un texte Répondre en citant

svp vérifier le lien 

 
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: Dim 25 Avr - 20:26 (2010)    Sujet du message: Codage, chiffrement d'un texte Répondre en citant

voila solution

program codes;

uses wincrt;

Var  ch : string;

    nc : integer;

function coder(m : integer; ch_org:string):string;

var    i,j,k,l,d    : integer;

      p,db,nb_bloc : integer;

      ch_out      : string;

begin

l:=length(ch_org);

d:=sqr(m)-(l mod sqr(m));

if d<>0 then

                  begin

                          For i:=1 to d do ch_org:=ch_org+' ';

                  end;

ch_out:=ch_org;

nb_bloc:=length(ch_org) div sqr(m);

p:=1;

For i:=1 to nb_bloc do

                        begin

                          db:=(i-1)*sqr(m) + 1;

                          for j:=0 to m-1 do

                              begin

                                      for k :=0 to m-1 do

                                        begin

                                          ch_out[p]:=ch_org[db+j+k*m];

                                          p:=p+1;

                                        end;

                              end;

                          end;

coder:=ch_out;

end;

procedure saisie(var m :integer; var txt_coder:string);

begin

  repeat

          write('Donner un entier entre 1 et          5 : '); readln(m);

  until m in [1..5];

  write('Saisir le texte ŕ coder : ');readln(txt_coder);

  writeln;

end;

begin

  saisie(nc,ch);

  writeln('le texte codé sera : ',coder(nc,ch));

end.


 
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: Jeu 29 Avr - 22:12 (2010)    Sujet du message: Codage, chiffrement d'un texte Répondre en citant

Okay Okay Okay Okay Okay Okay
_________________
Cordialement


 
Revenir en haut
darine


Hors ligne

Inscrit le: 26 Nov 2008
Messages: 15
Féminin
Point(s): 45
Moyenne de points: 0

Posté le: Jeu 29 Avr - 22:47 (2010)    Sujet du message: Codage, chiffrement d'un texte Répondre en citant

merci bien pour le partage

 
Revenir en haut
Contenu Sponsorisé






Posté le: Aujourd’hui à 17:20 (2016)    Sujet du message: Codage, chiffrement d'un texte

 
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