Ada : 정수를 반올림 처리

Question

매우 간단 해 보이는 조작에 많은 어려움을 겪고 있습니다. 나는 몫을 기꺼이 씁니다. 나는 그 I : Integer := A/B, (여기서 A와 B는 정수) 반환 층을 알고있다. 그러나 나는 천장에 가고 싶다. 나는 'Ceiling'Round'Rounding과 놀려고했지만 그 중 아무 것도 작동하지 않는 것으로 보인다. (대부분 컴파일되지 않았다.) 나는 솔루션 (것이 가능 다스 형식 변환없이 작성) 우아한와 빠른 대답을 바라고 있어요; D

일반적으로

Answer 1

을 내가

I : Integer := (A + (B - 1))/B; 

(일반적으로 할 때 건너라고 말하고 싶지만 특정 비트 수를 수용하는 데 필요한 기억 장치 수를 계산하십시오).