===== PascalABC.NET =====
begin
var a := ReadArrInteger('Введите пять целых чисел:', 5);
Println('Их сумма равна', a.Sum)
end.
