Помоигте с задачей на массив

[Juhn]

Помогите пожалуйста написать программу в паскале. Я с массивами вообще не знаком, а прогу написать нужно. Надеюсь кому - то не сложно будет написать. Очень надеюсь на вашу помощь.
Условие: Дан массив из 10 целых чисел. Найти сумму элементов данного массива.

[Карась]

For i := 1 To N Do
rez := rez + mas[i];
Writeln (rez);

Где N - размерность массива, mas - его имя, rez - результат.
Элементарщина... такое не знать значит закосил все пары и ничево нечитал даже.

[Juhn]

Да нет просто в школе массивы ещё не проходили, я все работы до массивов сделал, (ушёл вперёд) и мне дали сейчас дальше на массывы, но в классе ещё не обьясняли Вообщем спасибо, мне вообще - то 2 задачи дали, может вторая тоже будет элементарна для вас.
Условие: Дан массив из 10 целых чисел. Найти наибольший и наименьший элемент данного массива, или распределить элементы массива по возрастанию. Одно из двух надо, что проще и быстрее, наибольший и наименьший элемент или распределить элементы массива по возрастанию.
Был бы благодарен если бы и эту написали, тогда моя работа была бы готова А с массивами сам обязательно разберусь, когда в классе обьяснять начнут ))

P.S слушай Карась, а что из этого в var прописывать нужно ? Что в реал, что в интегер, или тут с массивами как - то подругому нужно ?

[Карась]

Хм... а ты точно

....... до массивов сделал, (ушёл вперёд) и мне дали сейчас дальше на массывы

Почитай какуюнибудь инфу по паскалю вообще....
Сдаётся мне что не только массивы тебе непонятны...

var mas : array [1..10] of integer;
    i, rez : integer;

[Juhn]

Что - то я совсем в массивы не вьезжаю. Непонимаю что это такое, какая то последователность чисел,... какой должен быть ответ, у меня 0 выдаёт :/

[Карась]

привиди полностью листинг.

[Juhn]

program masiv;
var mas : array [1..10] of integer;
i, rez : integer;
begin
For i:= 1 To 10 Do
rez:= rez + mas[i];
Writeln(rez);
readln;
end.

[Карась]

А еслитак...

begin 
rez := 0;
For i:= 1 To 10 Do 
rez:= rez + mas[i]; 
Writeln(rez); 
readln;
end.

[Juhn]

Всё равно 0 показывает, а как там со второй програмкой ?

[puporev]

Ты массив то заполни хотя бы чем-то, а то он у тебя пустой, как одна штука не теле.