Bonjour, j'ai créé un programme simple permettant d'initialiser et d'afficher un vecteur de 50 éléments de façon à ce que chaque élément contienne son rang élevé à la puissance 2.

J'ai écrit le programme suivant sous turbopascal7 :
Code : Sélectionner tout - Visualiser dans une fenêtre à part
1
2
3
4
5
6
7
8
9
10
11
12
program puissance;
 
Var V array [1..50] of Integer;
Var K : Integer;
 
 Begin
       For K:=1 to 50 do
           Begin
           V[K]=K*K;
           write(V[K])
           End;
End.
La compilation fonctionne mais rien ne s'affiche (et le programme m'est inutile). Sauriez-vous d'où vient l'erreur ?