ако е за Паскал се прави с div и mod в условие IF...