“Круглый потолок” Ответ

Круглый потолок

oldmort$enter <- floor(oldmort$enter)
oldmort$exit <- ceiling(oldmort$exit)