kronidas

man reikia sukurti masyva su n elementu *skaiciu kinta, nuskaitomas is failo). bandau taip bet neina (eina tik jei NN nepriskiri kintamaji, o pvz 5):

Sveikas,

daryk taip :-)

program Bevarde0;

function masyvas(n : integer) : integer;

var

a: array[1..1000] of Integer;

i : integer;

begin

if (n < 1000) then

for i:=1 to n do

begin

writeln(i);

{kiti veiksmai}

end;

end;

begin

masyvas(5);

end.

Marius

<mokau programavimo, informatikos>