Проверьте и отредактируйте задачу пожалуйста .

[iYoung]

Задача - Дано натуральное число N. Найти число единиц в двоичной записи числа N.


Сам паскаль изучаю меньше месяца , поэтому возникает очень много сложностей ... Эту задачу при помощи советов и гугла решил вот так ... Но она не работает ((((

[iYoung]

ну кто-нибудь помогите пожалуйста )

[sheka]

после работы нажмите альт-ф5

или перед последним ендом поставьте реадлн.

[iYoung]

так программа в любом случае выдает ответ 0 ..... Ошибка где то ((((

[illia2009]

значит так, всё по порядку.
во-первых, оператор "mod" возвращает остаток от деления если делитель меншьше деленного. в противном случае "mod" возвратит НЕ НОЛЬ, а деленное. а так как в версии Pascal начиная с 7 все переменные обнуляются, то k=0. и условие "if k=1 then inc(i);" НИКОГДА не выполнится. мало этого, после того как n станет равная нулю (0), то на экран выведится переменная i, которая в силу того, что условие "if k=1 then inc(i);" не выполнилось ни одного раза, будет равна нулю (0). то есть, другими словами, эта программа ВСЕГДА (в версии компилятора 7 и выше (7.1) будет выдавать ноль (0) на экран.

думаю тут гуглом (google) не обойдётся, тебе нужно обратиться к репетитору. хорошые здесь http://programskitchen.com/