import System.IO

sum35 i acc max | i >= max = acc
	      	| rem i 3 == 0 ||rem  i 5 == 0 = sum35 (i+1) (acc+i) max
	      	| otherwise = sum35 (i+1) acc max

main = print (sum35 1 0 1000)