Verified answer

var i, sum1, sum2: integer;

begin

   sum1:= 0;

   sum2:= 0;

   for i:= 13 to 75 do

       if i mod 10 = 3 then

           sum1:= sum1 + i

       else if i mod 3 = 0 then

           sum2:= sum2 + i;

   if sum1 > sum2 then writeln("Первая сумма больше") else

   if sum2 > sum1 then writeln("Вторая сумма больше");

end.