пожалуйста помогите Составьте программу, которая заполняет массив a[1..10] случайными целыми числами в диапазоне от 1 до 10 и вычисляет сумму элементов массива с четными значениями.

ето точно не все

нечаянно отправил

так отправь полностью

не выпендривайся, плес. синтаксис паскаля я не знаю, так что поправишь, если что.

randomize;integer summ, array[1..10];summ := 0;for I := 1 to 10 do beginarray[I] := random(10)+1;end;for j := 1 to 10 do beginif array[j] mod 2 == 2 do beginsumm += array[j];end;end;