질문하시는 분은 적어도 성의가 있어야 한다고 생각합니다.
<br>
아무것도 해보시지 않고 그냥 질문만 올리시는듯한 느낌이 듭니다.
<br>
적어도 작성하신데 까지는 올려주셔야 어떤부분을 이해못하시고 계시는지 파악이 가능하며,
<br>
성의가 있어 보이니깐요..
<br>
이곳은 숙제를 대신 해주는 곳이 아니라는 것을 말씀드립니다.
<br>
암튼 1~100 까지 짝수중 4로 나누어지지 않는 수들의 합을 구하는 프로그램은 다음과 같습니다.
<br>
<br>
*************************************************************
<br>
SUM=0
<br>
DO I=1,100
<br>
IF(MOD(I,2).EQ.0 .AND. MOD(I,4).NE.0) SUM=SUM+FLOAT(I)
<br>
ENDDO
<br>
*************************************************************
<br>
<br>
일단 DO LOOP를 이용해서 1~100까지의 수를 계산대상에 올려놓습니다.
<br>
여기서 MOD(A1,A2)라는 함수를 이용해서 합산에 포함 여부를 결정합니다.
<br>
MOD함수는 A1/A2를 해서 남는 나머지입니다.
<br>
예를들어 MOD(4,2)=0, MOD(4,4)=0, MOD(4,3)=1 이 됩니다.
<br>
MOD(I,2).EQ.0 ==> 2로 나누었을때 나머지가 0 이면 오케이
<br>
MOD(I,4).NE.0 ==> 4로 나누었을때 나머지가 0 이 아니면 오케이
<br>
위 두 조건을 동시에 만족시키면 합산에 포함을 하면 됩니다.
<br>
이해가 되시는지요?
<br>
아~~ 프로그램에서 FLOAT(I)는 정수형 변수를 실수형 변수로 바꾸어주는 것입니다.
<br>
정수형, 실수형 변수에 대해서는 이해를 득하고 계시겠죠?
<br>
<br>
암튼...다음부터는 질문을 올리실때 적어도 작성하신 부분은 올려주시기 바랍니다.
<!-- -->
첫댓글 죄송합니다~~ 수업가기 전에 잠깐 올린거라~~그리고 이제 배우는거라 무례를 범했네요^^ 감사합니다....