Составить программу которая выводит на экран сумму n первых натуральных чисел , кратных 3

var x,i: integer;
begin
x=10;
for i:=1 to x do
if i mod 3=0 then write(i,' ');///можно без кавычек
end.