petit programme Mupad
salut
j'aimerais faire fonctionner ces deux petits programmes sous MUPAD mais en compilant j'ai des erreurs que je ne comrends pas. Qqun peut il m'aider ?
ils sont tres simples a comprendre
chiff_chaine:=proc(K:DOM_LIST) \\ ma procedure recois une liste K
local i: \\ i est la seule variable locale ici
begin
Z:=[ ]: \\ j'initialise cette liste vide
for i from 1 to nops(K) do \\i va de 1 au nombre d'elements de la liste K
Z:= Z.[K[ i]]: \\ a chaque tour, à Z on concatene K[ i]
end_for:
end_proc:
déja cette procedure m'affiche une erreur d'expréssion et je n'arrive pas à la rectifier
chiff_chaine:=proc(K,C,X) \\ ma procedure recois les listes K,C,X
local i,j,k:
begin
if nops(K) <> nops(C)
then("donner les listes K et C de meme taille"):
else
Z:=[]: \\ j'initialise cette liste vide
for k from 1 to nops(K) do \\ k va de 1 au nombre d'elements de la liste K
Z:= Z.[K[k]]: a chaque tour, à Z on concatene K[k]
end_for:
if nops(X) > nops(K) \\ si le nombre d'elements de X > nbre elements de K
then
j:=0:
for i from 1 to nops(X)-nops(K) do
Z[i+m]:=0:
while j <= nops(X)-nops(K) do
Z[i+m]:= Z[i+m]+C[j]*Z[i+j] mod 2:
i:=i+1:
end_while:
end_if:
print("le texte chiffré est le suivant:"):
for i from 1 to n do
Y[ i]:= X[ i]+Z[ i] mod 2:
end_for:
return(Y):
end_proc:
la encore c'est simple mais ca m'affiche des erreurs
a titre d'information cette procedure effectue un cryptage d'une liste donné en binaire
j'aimerais faire fonctionner ces deux petits programmes sous MUPAD mais en compilant j'ai des erreurs que je ne comrends pas. Qqun peut il m'aider ?
ils sont tres simples a comprendre
chiff_chaine:=proc(K:DOM_LIST) \\ ma procedure recois une liste K
local i: \\ i est la seule variable locale ici
begin
Z:=[ ]: \\ j'initialise cette liste vide
for i from 1 to nops(K) do \\i va de 1 au nombre d'elements de la liste K
Z:= Z.[K[ i]]: \\ a chaque tour, à Z on concatene K[ i]
end_for:
end_proc:
déja cette procedure m'affiche une erreur d'expréssion et je n'arrive pas à la rectifier
chiff_chaine:=proc(K,C,X) \\ ma procedure recois les listes K,C,X
local i,j,k:
begin
if nops(K) <> nops(C)
then("donner les listes K et C de meme taille"):
else
Z:=[]: \\ j'initialise cette liste vide
for k from 1 to nops(K) do \\ k va de 1 au nombre d'elements de la liste K
Z:= Z.[K[k]]: a chaque tour, à Z on concatene K[k]
end_for:
if nops(X) > nops(K) \\ si le nombre d'elements de X > nbre elements de K
then
j:=0:
for i from 1 to nops(X)-nops(K) do
Z[i+m]:=0:
while j <= nops(X)-nops(K) do
Z[i+m]:= Z[i+m]+C[j]*Z[i+j] mod 2:
i:=i+1:
end_while:
end_if:
print("le texte chiffré est le suivant:"):
for i from 1 to n do
Y[ i]:= X[ i]+Z[ i] mod 2:
end_for:
return(Y):
end_proc:
la encore c'est simple mais ca m'affiche des erreurs
a titre d'information cette procedure effectue un cryptage d'une liste donné en binaire
Connectez-vous ou Inscrivez-vous pour répondre.