Les listes
Fermé
mira
-
24 mai 2013 à 12:49
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 - 25 mai 2013 à 23:02
KX Messages postés 16734 Date d'inscription samedi 31 mai 2008 Statut Modérateur Dernière intervention 24 avril 2024 - 25 mai 2013 à 23:02
A voir également:
- Les listes
- Créer des listes déroulantes excel - Guide
- Excel listes déroulantes en cascade - Guide
- Additionner deux listes python - Forum Python
- Cmd lister les disques ✓ - Forum Windows
- Le fichier contient une liste de prénoms. triez ce tableau par ordre alphabétique des prénoms. quel mot est formé par les 6 premières lettres de la colonne code ? - Forum LibreOffice / OpenOffice
2 réponses
AssassinTourist
Messages postés
5710
Date d'inscription
lundi 16 janvier 2012
Statut
Contributeur
Dernière intervention
29 février 2024
1 310
24 mai 2013 à 14:36
24 mai 2013 à 14:36
Bonjour,
Le deuxième petit schéma devrait t'éclairer : http://www-ipst.u-strasbg.fr/pat/program/pascal16.htm
Le deuxième petit schéma devrait t'éclairer : http://www-ipst.u-strasbg.fr/pat/program/pascal16.htm
LE programme pour faire les listes est:
program Liste ;
uses wincrt;
var n,i : integer;
liste : array [1..100] of real ;
begin
write('entrer le nombre de lignes n:');
readln(n);
writeln('entrer ligne par ligne les coefficients du tableau liste:');
for i:=1 to n do
begin
write('liste(' ,i, ')= ');
readln(liste[i]);
end;
writeln('les coefficients du tableau liste(' ,n, ') sont :');
for i=1 to n do
writeln('liste(' ,i, ' , ')=',liste[i]);
end.
program Liste ;
uses wincrt;
var n,i : integer;
liste : array [1..100] of real ;
begin
write('entrer le nombre de lignes n:');
readln(n);
writeln('entrer ligne par ligne les coefficients du tableau liste:');
for i:=1 to n do
begin
write('liste(' ,i, ')= ');
readln(liste[i]);
end;
writeln('les coefficients du tableau liste(' ,n, ') sont :');
for i=1 to n do
writeln('liste(' ,i, ' , ')=',liste[i]);
end.
25 mai 2013 à 23:02
https://forums.commentcamarche.net/forum/affich-37593771-prise-en-main-d-ipcute