2009-09-07 4 views

답변

6
case Sign(num) of 
    -1: ... 
    0: ... 
    1: ... 
end; 

? 당신이 결정합니다.

+0

멋진, 고상한. 감사! –

0

그렇다면 사용하지 않는 이유는 무엇입니까? if ... else if ... else 이상 읽을 수

if num = 0 then 
     cont_0 := cont_0 + 1; 
if num > 0 then 
BEGIN 
     cont_pos := cont_pos + 1; 
     sum_pos := sum_pos + num; 
END 
if num < 0 then 
     sum_neg := sum_neg + num; 
+0

흐름도에서 나는 CASE를 사용했다. 나는 그것을 더 좋아한다. 덜 부피가 작다. 어쨌든 고마워! –