syntaxe Array dans pascals

Question

Je suis programmeur java, mais maintenant je commence à en apprendre davantage buter la programmation pascals pourrait vous aider s'il vous plaît Comment écrire cette syntaxe Java dans le programme pascals

 A[m] = scan.nextInt(); 

est que demander à l'utilisateur d'entrer la « taille » puis entrez l'élément ... (en utilisant Array) Je l'ai fait:

writeln('How many Number you would like to sort:'); 
    readln(size); 


    For m := 1 to size do 
Begin 
    if m=1 then 
begin 
writeln(''); 
writeln('Input the first value: '); 
    (????) 



End; 

Je ne savais pas comment remplir?

syntaxe Java est:

for(m = 0; m<size; m++) 
{ 
    if(m == 0) 
    { 
     System.out.println(""); 
     System.out.print("^_^ Input The First Value:"); 
     A[m] = scan.nextInt(); 
    } 
    else if(m == size -1) 
    { 
     System.out.print("^_^ Input The Last Value:"); 
     A[m] = scan.nextInt(); 
    } 
    else 
    { 
     System.out.print("^_^ Input The Next Value:"); 
     A[m]= scan.nextInt(); 
    } 
} 

merci

Answer 1

Essayez: readln (un [m]);

Answer 2

Ceci est une tentative d'utilisation d'un tableau pour recevoir les données. Le tableau ps a sa taille limitée par une variable.

var/type 
A = array [1..13] : integer; 
m : integer; 

repeat 
    readln (A[m]); 
    m:=m+1; 
until (m<=10); 

Je pense ...

Answer 3

aveugle de frappe ici, mais nous espérons que le concept vient à travers:

{ in declarations } 
var A: array[1..99] of integer; { or however many you need; data workspace } 
    m: integer; { loop index } 
    size: integer; 


{ in code } 
fillchar(A,sizeof(A),#0); { just good practice to clear out the workspace before starting} 
writeln('How many Number you would like to sort:'); 
readln(size); 

For m := 1 to size do 
    begin 
    if (m=1) then 
     writeln('Input the first value: ') 
    else 
     if (m=size) then 
     writeln('Input the last value: ') 
     else 
     writeln('Input the next value: '); 
    readln(a[m]); 
    end; 

Notez que je l'ai utilisé un tableau 1 indexé plutôt qu'un zéro indexé. Aucune autre raison que je ne le préfère de cette façon, enregistre en utilisant "-1" partout.

Answer 4

read(a[m]); 

devrait fonctionner parfaitement.