Tableaux en delphi
komika
-
KX Messages postés 19031 Statut Modérateur -
KX Messages postés 19031 Statut Modérateur -
Bonjour,
j'aimerai savoir comment - en delphi - creer un tableau pour contenir les coordonnees (x,y) d'une dizaine de points, le remplir au fur et a mesure qu'on a ces points et a la fin l'afficher.
merci de m'aider
j'aimerai savoir comment - en delphi - creer un tableau pour contenir les coordonnees (x,y) d'une dizaine de points, le remplir au fur et a mesure qu'on a ces points et a la fin l'afficher.
merci de m'aider
Configuration: Windows XP Internet Explorer 7.0
A voir également:
- Tableaux en delphi
- Delphi 7 - Télécharger - Langages
- Tableaux word - Guide
- Tableaux croisés dynamiques - Guide
- Fusionner deux tableaux excel - Guide
- Delphi 7 serial number ✓ - Forum Delphi
1 réponse
const NBcases=10; // ou plus
type Coordonnees=record
x,y:integer;
end;
Tableau=array[1..NBcase] of Coordonnees;
function Remplir:Tableau;
var i:integer;
begin
for i:=1 to NBcases do
begin
write('x',i,' : ');
readln(result[i].x);
write('y',i,' : ');
readln(result[i].y);
writeln;
end;
end;
procedure Afficher(var t:Tableau);
var i:integer;
begin
for i:=1 to NBcases do
begin
writeln('x',i,' : ',result[i].x);
writeln('y',i,' : ',result[i].y);
writeln;
end;
end;
