Напишите программу подсчёта количества натуральных чисел не провосходящих 1000 которое при деление на три дают в остатке 2 паскаль