Сколько натуральных чисел от 1 до 1000 включительно делятся на 3 или на 5, или на 7?

#! /usr/bin/env python # encoding: utf-8 s = {3: 0, 5: 0, 7: 0} for i in range(1, 1001):       for j in (3,5,7):             if i%j==0:                   s[j] += 1                   break print "количество кратных чисел." print "первая цифра - делитель," print "вторая - количество кратных" print "ей чисел" print s

var

  n,i,z: integer;

begin

  readln(n);

for i: =1 to n do if n mod i=0 then inc(z,i);

writeln(z);

end.