un petit programme simple qui permet de creer un triangle avec des etoiles apres lui avoir affecte un nombre de ligne..
Source / Exemple :
program triangle_isocele;
var lig,l,i,esp,caract:integer;
begin
repeat
writeln('donner le nombre de ligne');
readln(lig);
until ((lig>0) and (lig<20));
for l:=1 to lig do
begin
esp:=lig-l;
for i:=1 to esp do
write(' ');
esp:=2*l-1;
for i:=1 to esp do
write ('*');
writeln;
end
end.
Conclusion :
vous donnez un nombre de ligne entre 0 et 19 et le prog vous affiche un triangle
Vous n'êtes pas encore membre ?
inscrivez-vous, c'est gratuit et ça prend moins d'une minute !
Les membres obtiennent plus de réponses que les utilisateurs anonymes.
Le fait d'être membre vous permet d'avoir un suivi détaillé de vos demandes et codes sources.
Le fait d'être membre vous permet d'avoir des options supplémentaires.