Составьте и запишите компьютерную программу на языке программирования паскаль для решения следующей : заполнить целочисленный массив 20-ю случайными элементами в диапазоне от 50 до 100, вывести их на экран, а затем найти сумму лишь чётных чисел. до завтра

PascalABC.NET 3.3.5, сборка 1659 от 09.04.2018
Внимание! Если программа не работает, обновите версию!

begin
  var a:=ArrRandom(20,50,100); a.Println;
  Writeln('Сумма четных значений равна ',a.Where(t->t.IsEven).Sum)
end.

Пример
60 77 58 60 64 54 91 78 56 85 65 87 83 76 83 63 63 77 97 67
Сумма четных значений равна 506