un programme qui ne fonctionne guère ... Fermé

Question

Bonjour, 


pouvez vous m'aider !! 
voila l'exercice je sais que c'est banal mais quand même je suis encore débutante :( 
exercice: 
Ecrivez un programme qui reproduit 20 lignes successives contenant chacune votre nom et prénom voila ce que j'ai fais mais ça ne marche pas 
program exercice; 
uses wincrt; 
var 
l,nm:string; 
n,i:integer; 
begin 
write('entrer le nom et le prenom '); 
readln(nm); 
l:=''; 
for i:=1 to 20 do
l[i]:= nm ; 
writeln;
end.
Configuration: Windows XP / Chrome 34.0.1847.131

tarek_dotzero · Answer

"reproduit 20 lignes successives" : est ce que ça ne veut pas dire "affiche" par hasard?

Ainsi que la variable l n'est plus nécessiare, la boucle doit être

for i := 1 to 20 do      WriteLn(nm);

Et même dans le cas où vous voulez créer les 20 lignes et les sauvegarder sans les afficher, l doit être un tableau de chaîne de caractère, autrement vous ne pourrez pas écrire l[i].

Un programme qui ne fonctionne guère ...

1 réponse

Discussions similaires