연 락 처 : 연락처 제목 포트란 (Fortran) 핵심 요약 및 500제 작성일 2020-08-08 페이지 1/1 1. 포트란 핵심 요약7 가. 개요7 나. ... 작업번호 A01 페이지 1/1 작성자 작성자 확인자 담당자 승인자 담당자 작성일 2020-08-08 제목 포트란 (Fortran) 핵심 요약 및 500제 파일명 [완료] 포트란 (Fortran ... ) 핵심 요약 및 500제.hwp - 1 - 포트란 (Fortran) 핵심 요약 및 500제 ?
화씨 입력하여 절대온도 출력하기1) 문제 정의 : 화씨온도를 입력하여 절대온도 단위로 변환하고, 100~300 사이를 10의 간격으로 변환한 표를 작성한다.2) 이론: do loop를 이용하여 표를 작성하고 read와 write로 변환 값을 출력한다.3) 프로그램 작성..
1. 배경 화면 바꾸기 ① 제어판에서 디스플레이 아이콘을 더블클릭한다. 또는 바탕 화면 아무곳에나 포인터를 위치한 후에 마우스 오른쪽 버튼을 누르고 등록정보를 눌러도 된다. ②디스플레이 등록정보라 표시된 메뉴가 나타난다. 이 때 배경화면을 선택한다. ③화면 오른쪽에 ..
수 치 해 석 Term Project 2) 그림과 같은 N.C Clay가 10m 깊이로 분포되어있다. Clay층이 50%압밀도를 보일때의 간극수압 분포를 그리시오. (Crank-Nicolson 방법을 이용,r=1) 는 1m로 결정. 1) 코딩 Program Term2_..
수치해석 Report#2 학과: 항공 우주 시스템 공학과 학번: 이름: Program 0000 C Writer is 0000 C Date 2015.07.20 C Chapter5 example3.6 solution C Display all divisors of an in..
program report ! 000 real m do 10 i= 1,61 open(6,file='output.txt') x=(i-1)*0.05 t=1.-x**2/2.+x**4/24. co = cos(x) write(6,20) x, t, co 20 format(3(f1..
해양공학과에 다니는 -가 운동을 하러 수영장에 갔다. 총 3일동안 수영을 하러 갔는데. 첫째날에는 자유형에 중점을 두고 자유형 2바퀴, 배영 1바퀴, 평영 1바퀴를 돌았다. 둘째날에는 배영에 중점을 두고 자유형 1바퀴, 배영 3바퀴, 평영 2바퀴를 돌았다. 셋째날에는..
수치해석 Report#1 학과: 항공 우주 시스템 공학과 학번: 이름: PROGRAM 0000 C Writer is 0000 C Date 2015.07.20 C Chapter2 example2 solution C Declarations Real m, n, i, j C ..
수치해석 항공우주시스템공학과 예제문제 f(x)=cos(x) 를 직접 계산한 것과 Taylor series로 계산한 것을 0 LEQ x LEQ 3 구간에 대하여 graph로 비교하시오. program report ! 000 real m do 10 i= 1,61 open(..
수 치 해 석 By program program Gauss_eli_pivot implicit none real :: a(50,50),c,temp,soln(50),factor,rmax integer :: pivot,t,n,n2,k,p,o,m,i,row,col,a_i,a_..
COMMON /C1/ SX(2),SF(2) COMMON /C2/ SY(2) COMMON /C3/ SG(2,3) INTEGER P DATA N/2/ DATA EPSE,M/0.00001,20/ READ(5,*) (SX(I),I=1,2) WRITE(6,200) N WRITE..
개발배경과 포트란의 기본구성 소개변수유형Chapter3 Selective Execution논리연산자Chapter4 Repetitive Execution반복문Chapter5 Input ... improves Pascal’s machine in 1670s so it could perform multiplication and divisionChapter2 Basic FORTRAN포트란의
수 치 해 석 program KU_term1 implicit none Real, Dimension(0:31,0:217) :: H Real :: amax, oldval, err integer :: numit, i, j open(unit=1,file="output1.txt..
