array in pascal

array in pascal

man tik vienas lamiskas klausimas:
reik man pascaly masyva padaryt

var sk: [1…10] of integer;
tarkim
ir tada begin ir ka rasyt kad man tuos visus nureadintu skaiciu 10. t.y. kad reiketu paciam juos ivest?
aciu is anxto.

mazdaug taip:

var sk: [1…10] of integer;
i : integer;

for i := nuokiek to ikikiek do
readln(sk[ i ]);

ok. aciu labai. atrodo veikia.