Question

Напишите программу в Паскаль.15б

Answer 1

begin
  write(ReadSeqInteger(ReadInteger()).Where(x -> x mod 3 = 0).Sum);
end.