Freepascal ir masyvai

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):

program Bevarde0;

function masyvas(n : integer) : integer;

const

NN = n;

var

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

begin

end;

begin

masyvas(5);

end.

kas butent neiseina?

ant NN = n; meta illegal expression

o tai kam tau isvis reikalingas tas const NN? is kart i masyva irasinek n, gal susitvarkys, nebandziau.

taip paprastai negalima, masyvo dydis turi buti aprasytas is anksto. o kad kintamo dydzio masyva daryt, manau arba rodykles naudot, arba gal ir buvo kazkoks bajeris, bet nepamenu.. pameginsiu truputi paieskot, gal ka atrasiu tarp senu univero programeliu.

nu zodz tingiu ieskot, truputi paguglinau, iskart radau puslapi kur raso, kad kintamo dydzio masyvu negalima sukurt ir siulo naudot rodykles, bet tos rodykles biski sudetingas dalykas kol ikerti, bet gal ikirsi..

http://en.allexperts.com/q/Pascal-1624/arr...urbo-Pascal.htm

program Bevarde0;

function masyvas(n : integer) : integer;

const

NN = n;

var

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

begin

end;

begin

masyvas(5);

end.

//

Komentarai mano: funkcija, kai apsirašinėji, atkreipk dėmesį, kam priskrii masyvo reikšmę.

YRA: function masyvas(n : integer) : integer;

TURI BŪTI: function masyvas(n : integer) : a;

EDITED: Nepamačiau klemko pranešimo :)

program Bevarde0;

function masyvas(n : integer) : integer;

const

NN = n;

var

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

begin

 

end;

begin

masyvas(5);

end.

 

//

 

Komentarai mano: funkcija, kai apsirašinėji, atkreipk dėmesį, kam priskrii masyvo reikšmę.

YRA: function masyvas(n : integer) : integer;

TURI BŪTI: function masyvas(n : integer) : a;

 

EDITED: Nepamačiau klemko pranešimo :)

galima ir paprasčiau, čia viskas paaiškinta

http://delphi.about.com/od/beginners/a/arrays.htm

galima ir paprasčiau, čia viskas paaiškinta

http://delphi.about.com/od/beginners/a/arrays.htm

Jei nepastebėjai, čia delfinas, o ne paskalis.

Jei nepastebėjai, čia delfinas, o ne paskalis.

na ir įdomu kokia kalbą naudoja delfinas? ar tik ne pascalį? :)

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>

dekui visiemk uz pagalba, manau susitvarkysiu :)

ant cpp tai normaliai su kintamu dydziu, bet dedes is SMM matyt mano kad FPS yra kalba #1 :)

Atsinaujink freepascali ir naudok kaip nori.

mas: array of integer;

setLenght(mas, dydis);

Dinaminiai masyvai jokia ne naujiena, bet fpc palaiko tik nuo 1.1 versijos (gal ir nuo dar naujesnės)