Q&A

  • 질문^^* - 피보나치수열
어제밤..

아니 오널 새벽엔 안 되던데 이젠 되넹...

이번엔 피보나치수열에 대한 플그램 하구 있는데욤...

좀 마니 했는데 답이 쪼메 다른게 있어서요....

procedure TWindow.ButtonOutputClick(Sender: TObject);

var

n : integer;

a : integer;

b : integer;

temp : integer;

begin

a := 0;

b := 1;

for n := 2 to StrToInt(Input.text) do

begin

temp := a + b;

a := b;

b := temp;

end;

Output.text := IntToStr(b);



end;



일케 하니깐 다 제대로 나오는데 딱 두개만 안 나오는거 있죠

3일때와 4일때..

왜 그럴까요??

0  COMMENTS