require 'prime' N = gets.to_i P = Prime.each(N).to_a ans = (2 .. N).inject(0) do |c, r| r2 = r ** 2 break c if r2 > N + 2 a = P.bsearch{|x| x + 2 >= r2 } a && a + 2 > r2 ? c : a > 2 ? c + 2 : c + 1 end puts ans