série d'exercices algorithmique 3SI (Enoncé + correction)

a et b étant deux variables de types chaîne de caractères. Ecrire un algorithme qui saisit les contenus de chacune, permute leurs contenus puis les affiche à l'écran.

Solution :

program Serie1Ex2;

uses wincrt;

var

a,b,aux:string;

begin

writeln('Donner les deux chaînes à permuter ');

readln(a);

readln(b);

aux:=a;

a:=b;

b:=aux;

writeln(a);

writeln(b);

end.