Q&A

  • 기본급을 읽어서 급여를 구하는 문제
문제는 이렇습니다

회사 직원의 수당은 모두 10만원이다 기본급을 읽어서 급여를 구하라
단 급여가 60만원 이하이면 60만으로 한다..

var

sd,gb,gy:integer;

begin
sd:=strtoint(label5.caption);
gb:=strtoint(edit2.text);

gy:=sd+gb

label4.caption:=inttostr(sd+gb);


대충 이렇게 해봤는데.. 급여 부분을 어떻게 해야될지 모르겠어여
또 수당을 10만원으로 고정하려면 어떻게 코잉해야  돼는지
폼 창에서 보일때.. 레밸을 써서 그냥 100000 을 입력하면 돼는지

무슨 말인지..  알아 들으시겠는지 모르겠는데..부탁합니다..

2  COMMENTS
  • Profile
    최진술 2003.03.28 19:56
    어떤식으로 구현하고자 하시는지는 아래코딩만으론 이해가 되지않지만
    음... 모든사람들의 수당이 10만원으로 일정하다면
    먼저 기본급이 DB화되어있다면 기본급을 읽어들이고 여기에 10만원을 인위적으로 더한값을 구하고
    이 더한값이 60만원보다크면 그냥진행하고 60만원이하면 60만원을
    최종결과값으로 RETURN시키면 되겠죠!!



  • Profile
    최은석 2003.03.28 19:49
    수당이 10만원으로 일정하다면..현재처럼 하셔도 됩니다만..
    변동가능성이 있다면..디비에서 읽어오는게 좋겟지요..

    sd:=strtoint(label5.caption);
    gb:=strtoint(edit2.text);
    gy:=sd+gb
    if (gy < 600000) then gy := 600000;
    label4.caption:=inttostr(sd+gb);