Напишите программу вычесления суммы чисел, кратных трём из 10 чисел введённых с клавиатуры.

//PascalABC.NET//Версия 3.3, сборка 1627beginwrite(ReadSeqInteger(10).Where(x->x mod 3=0).Sum);end.