se avessi risposto prima io avrei postato lo stesso codice che hai postato tu perchè aveva richiesto proprio quello!!!
HAHAHA! Non credevo di intendere quello
Ma nooooo!!!!!!!!!!! questo codice è sbagliatooooooooo: VVoVe: VVoVe:
codice:
program stampaivalorida1a100 (output);
type ins=array[1..100] of integer;
var a:ins;
i:integer;
{procedure}
procedure stampa(var a:ins);
begin
for i:=1 to 100 do writeln(a[i]);
end;
{inizio main}
begin
for i:=1 to 100 do a[i]:=i;
stampa(a);
readln;
end.
Ma scusate che variabili locali sono se posso vedere l'array da una qualsiasi funzione/procedura? Infatti basta fare cosi:
codice:
program stampaivalorida1a100 (output);
type ins=array[1..100] of integer;
var a:ins;
i:integer;
{procedure}
procedure stampa;
begin
for i:=1 to 100 do writeln(a[i]);
end;
{inizio main}
begin
for i:=1 to 100 do a[i]:=i;
stampa;
readln;
end.
...e vedo l'array