728x90
반응형

과제

 

1. 1에서 2000까지 솟수를 찾아 출력하시오. 

 

2.  F = 1 + (1+2) + (1+2+3) + ... + (1+2+3+ ... + 15) 의 값을 구하는 코드

 

 

3. {12.3, 5.2, 6.8, 27.1, 22.5, 1.8, 5.4, 78.2, 15.4, 62.5, 1.1, 8.6, 4.5, 44.4, 22.2, 33.2, 5.4, 1.8} 를 (1) 오름차순, (2) 내림차순으로 정렬하고 출력하시오. 

 

 

4.  y = -x2 + 8 x -12 의 최대값 구하는 코드를 작성하시오.

5. y= x2 - 9 의 최소값 구하는 코드를 작성하시오.

6. x가 [0,5] 구간에 존재할 때, y = x3 - 6x2 + 8x 의 최대값과 최소값을 구하는 코드를 작성하시오. 단 x의 간격은 0.1로 한다. 

7. 6과 8의 최소 공배수를 구하는 코드를 내장함수를 사용하지 않고 작성하시오. 

 

8. 18와 8의 최대 공약수를 구하는 코드를 내장함수를 사용하지 않고 작성하시오. 

9. {132, 278, 98, 323, 119, 296} 중 최대값을 출력하는 코드를 내장함수를 사용하지 않고 작성하시오.

 

10. {986, 376, 271, 688, 998, 523} 중 최소값을 출력하는 코드를 내장함수를 사용하지 않고 작성하시오. 

 

11. {2.8, 3.6, 9.8, 12.6, 13.8, 16.9, 33.2, -6.3, 29.1, -23.1, 99.1, -93.6} 중 음수를 뽑아 출력하는 코드를 작성하시오. 

728x90
반응형
728x90
반응형

연습

1. 아래 식에서 Sum을 구하시오.

2.임의의 변수 number를 화면입력 받아 number의 제곱을 출력하는 프로그램을 작성하시오. 단 number가 -999면 프로그램을 완전히 종료하고 number가 0이면 number를 다시 입력 받는 프로그램을 작성하시오.

 

3. 1부터 순차적으로 1씩 증가하는 i 변수의 합이 100보다 작을 때까지의 합을 구하는 프로그램을 DO WHILE 문을 사용하여 작성하시오.

 

4. Newton 방정식에 의한 N에 대한 제곱근을 구하는 공식은 다음과 같다. 

                    Xn+1 = (1 / 2) * (Xn + n / Xn)

 

n 이 100에서 1000까지 변할 때 Newton방정식에 의한 제곱근과 SQRT함수를 이용한 제곱근의 결과를  나란히 출력하여 비교할 수 있도록 코드를 작성시오. 

 

5. 아래 연속 나눗셈을 DO문을 사용하여 작성하시오.

     25.0 / 5.0 / 0.1 / 10.0 / 5.0 / 0.5

 

6. 1~100까지 연속된 정수에 대해서 숫자 10개씩 이동평균을 구하여 출력하는 코드를 작성하시오.

728x90
반응형
728x90
반응형

 

 

관련 실습 연습 과제

 

포트란 수업 :: 순환문 (연습/과제)

연습 1. 아래 식에서 Sum을 구하시오. 2.임의의 변수 number를 화면입력 받아 number의 제곱을 출력하는 프로그램을 작성하시오. 단 number가 -999면 프로그램을 완전히 종료하고 number가 0이면 number를 다

aeir.tistory.com

 

728x90
반응형
728x90
반응형

과제

1. 어느 회사의 주급은 정규직의 경우는 오직 연봉에 따라 결정되고 (총 52주 가정), 임시직의 경우는 일주일간 일한 시간과 시급에 따라 결정된다. 단, 임시직의 경우 40시간  초과 근무를 한 경우 약 1.5배의 초과수당이 지급된다. 정규직 (P)인지 임시직 (T)인지 입력 받아 고용인들의 주급을 결정하는 프로그램을 작성하시오 (정규직의 경우는 연봉을 임시직의 경우는 일한시간과 시급을 입력 받아야 한다).

 

2. 아래의 순서도를 각각 코딩하시오. 

 

 

3. 이차 방정식의 근을 구하는 프로그램을  (1) 논리 if 문, (2) block if 문을 사용하여 각각 작성하시오.

참고) 산술 if 문는 F77에서 주로 사용함. 논리식이 참이면 해당 문번호 분기하는 if문

 

 

4. 아래 두 직선 방정식의 계수 A, B, C, D, E, F의 값을 읽는 프로그램을 작성하시오. 이 후, 두 직선이 평행(= 기울기가 같다)한지 교차하는지 결정하고 교차한다면 수직 (기울기의 곱이 -1)인지를 결정하는 코드를 추가하시오. 

  Ax + By = C

  Dx + Ey = F

 

5. 미국 텍사스 중부 지역에서는, 기온이 최소 20oC이고, 상대습도가 20~40% 사이, 풍속이 최대 4 m/s 이상인 경우, 비행기로 살충제를 살포할 수 있다고 한다. 기온, 상대습도, 풍속을 입력받아, 살충제 살포 가능한 날인지 아닌지를 True, False 로 구분하는 프로그램을 작성하시오. 

 

728x90
반응형
728x90
반응형

포트란 수업 :: 선택문

목차

자유형식의 입력문 
CASE 선택문 
기명 CASE 문
논리 IF 문
블록 IF 문 
기명 IF 문
포트란 예제 연습 실습 과제 

 

포트란 수업 :: 선택문

목차 자유형식의 입력문 CASE 선택문 기명 CASE 문 논리 IF 문 블록 IF 문 기명 IF 문 포트란 예제 연습 실습 과제 연습 실습 과제 https://aeir.tistory.com/entry/%ED%8F%AC%ED%8A%B8%EB%9E%80-%EC%88%98%EC..

aeir.tistory.com

 

 

 

연습문제

 

내장 함수 abs를 쓰지 않고 실수 numb를 입력받아 그 절대값을 출력하는 프로그램을 작성하시오.

 

다음 IF 문이 타당한지 결정하라.

If(a>b) print*, a

If b<c n= n+1

If(x<=y) stop

If(a=x) read*,y

If(1<=N<=10) N= 10

 
 

아래 코드들의 출력을 비교 하시오.

 

 

IF문을 이용하여 오염지수 구하는 프로그램을 작성하시오. (교재 86 쪽  참고)

 

CASE 문을 이용하여 오염지수 구하는 프로그램을 작성하시오. (교재 94 쪽  참고)

 

 

728x90
반응형
728x90
반응형

목차

자유형식의 입력문 
CASE 선택문 
기명 CASE 문
논리 IF 문
블록 IF 문 
기명 IF 문
포트란 예제 연습 실습 과제 

 

 

 

 

 

 

연습 실습 과제 

https://aeir.tistory.com/entry/%ED%8F%AC%ED%8A%B8%EB%9E%80-%EC%88%98%EC%97%85-%EC%84%A0%ED%83%9D%EB%AC%B8-%EC%97%B0%EC%8A%B5?category=963061 

 

포트란 수업 :: 선택문 (연습/과제)

보호되어 있는 글입니다. 내용을 보시려면 비밀번호를 입력하세요.

aeir.tistory.com

 

728x90
반응형

728x90
반응형

변수명 :

단순 변수명과 배열명

단순 변수명 : 1개의 데이터만 기억

배열명 : 여러 개의 데이터를 기억시키는 연속된 메모리를 지칭

 

배열의 표현에는 반드시 첨자를 사용

첨자는 반드시 정수나 정수형 변수명을 사용

 

예) 

INTEGER, DIMENSION :: A(5), M(10), S(10)
INTEGER :: SUM(10), HOPE(20)
REAL :: ABC(7), ZZZ(12)
LOGICAL :: FLAG(10)
CHARACTER(50) :: ADDRESS(100)

 

728x90
반응형

+ Recent posts