Создать массив а из десяти целых чисел, принадлежащих промежутку (0; 50) выведите полученный результат на экран. подсчитать сумму элементов (работа в паскаль). я просто тему пропустила, а объяснять не хотят : (

Var  a :array [1..10] of integer;  i, sum :integer;
begin
  randomize;  for i:= 1 to 10 do    a[i]:= random(50);  sum:= 0;  for i:= 1 to 10 do    sum:= sum + a[i];  writeln(sum);
end.