Come inverto i valori degli elementi di un vettore?

[Xboxman]

Mi sto riferendo al linguaggio Pascal... perchè così non va bene? Cosa devo modificare?:

program inverte;
uses crt;
var v:array[1..100] of real;
i,n:integer;
x:real;
begin
clrscr;
repeat
writeln('Inserisci quantit… elementi');
readln(n)
until (n>=1) and (n<=100);
for i:=1 to n do
begin
writeln('Inserisci elemento di posto ',i);
readln(v[i]);
end;
for i:=1 to n do
begin
x:=v[i];
v[i]:=v[n-i+1];
v[n-i+1]:=x
end;
writeln;
writeln('L''ordine inverso è:');
for i:=1 to n do writeln(v[i]:1:2);
readln
end.

[morgoth90]

un po di giustificazione non guasterebbe X_X

[Xboxman]

Problema risolto, potete chiudere!

program inverte;
uses crt;
var v:array[1..100] of real;
i,n:integer;
x:real;
begin
clrscr;
repeat
writeln('Inserisci quantit… elementi');
readln(n)
until (n>=1) and (n<=100);
for i:=1 to n do
begin
writeln('Inserisci elemento di posto ',i);
readln(v[i]);
end;
for i:=1 to n div 2 do
begin
x:=v[i];
v[i]:=v[n-i+1];
v[n-i+1]:=x
end;
writeln;
writeln('L''ordine inverso &#232;:');
for i:=1 to n do writeln(v[i]:1:2);
readln
end.

[Revan1985]

azz... ci ho rimurgunato su per 1h, ma non avevo notato quel div2 che mancava

mi sembrava che fosse strano lo scorrimento "totale" dell'array

e poi dovrei essere un informatico

[Xboxman]

azz... ci ho rimurgunato su per 1h, ma non avevo notato quel div2 che mancava

mi sembrava che fosse strano lo scorrimento "totale" dell'array

e poi dovrei essere un informatico

A chi lo dici! A me sono un paio d'ore che mi ero ingrippato su questo prog perchè non riuscivo a capire dov'era il problema!

[miniBill '90]

per inserire codice &#232; buona norma usare il bbcode "code"
[code]inoltre, se il codice &#232; lungo &#232; utile usare uno spoiler

[The_Ed]

altrimenti ti fotte tutta l'indentazione... ci ho messo un quarto d'ora solo per capire dove iniziavano e finivano i blocchi
Anche perch&#232; il Pascal non l'ho usato gran che...

[morgoth90]

altrimenti ti fotte tutta l'indentazione... ci ho messo un quarto d'ora solo per capire dove iniziavano e finivano i blocchi
Anche perchè il Pascal non l'ho usato gran che...

ecco identificazione intendevo