monsieu marouene .je veux avoir la solution de cette exercices s'il ous plait Merci
Page 1 sur 1
monsieu marouene .je veux avoir la solution de cette exercices s'il ous plait Merci
programme:
on veut ecrire un programme pascal permettant de lire un mot intitule CHM et aficherles chaines de caracteres suivantes :
la chine formee par le premier et le dernier caractres de CHM.
la chaine formee par les deux premiers caracteres et les deux derniers caracteres de CHM.
Etc...
exemple:
si la chaine CHM contient ((TURBO)) alors le programme affichera:
TO
TUBO
TURRBO
TURBURBO
TURBOTURBO.
on veut ecrire un programme pascal permettant de lire un mot intitule CHM et aficherles chaines de caracteres suivantes :
la chine formee par le premier et le dernier caractres de CHM.
la chaine formee par les deux premiers caracteres et les deux derniers caracteres de CHM.
Etc...
exemple:
si la chaine CHM contient ((TURBO)) alors le programme affichera:
TO
TUBO
TURRBO
TURBURBO
TURBOTURBO.
marouene- Invité
correction exercice turbo
program turbo;
uses wincrt;
var
ch:string;
i:integer;
begin
writeln('saisir une chaîne');
readln(ch);
for i:=1 to length (ch) do
writeln(copy(ch,1,i)+copy(ch,length(ch)-i+1,i));
end.
uses wincrt;
var
ch:string;
i:integer;
begin
writeln('saisir une chaîne');
readln(ch);
for i:=1 to length (ch) do
writeln(copy(ch,1,i)+copy(ch,length(ch)-i+1,i));
end.
Sujets similaires
» Problèmes bac scientifique
» Cours et exercices Pascal
» Exercices corrigés sur les structures itératives
» exercices corrigés (boucle pour)
» Exercices corrigés pour les 2ème année
» Cours et exercices Pascal
» Exercices corrigés sur les structures itératives
» exercices corrigés (boucle pour)
» Exercices corrigés pour les 2ème année
Page 1 sur 1
Permission de ce forum:
Vous ne pouvez pas répondre aux sujets dans ce forum
|
|