ЧТО НЕ ТАК С НЕЙ? НЕ РАБОТАЕТ!

7 года назад от AC/DC

1 ответ

0 голосов
1) delit написана как процедура, а вызывается как функция.
Нужно переделать в функцию (с return delit) и передавать ей только значение Х. И writeln (k) внутри неё не нужно.
Или оставить процедурой, но тогда вызов и использование очень неудобно.
2) в сравнения добавить равенство, иначе при равных количествах делителей выводиться ничего не будет

Или же
7 года назад от Сахраб Исмаилов

Связанные вопросы