블로그
- Populating Array in DOS Batch Script you. example1 set FILE_LIST=(file1.dll file2.exe file3.dll file4.dll file5.dll) set BIN_PATH="C:\Program Files\My App Folder\bin" set BAK_PATH="C:\Program Files\My App Folder\bin\Backups" set DEV_PATH="C:\
- 北에선 산꼭대기 나무 파내고 옥수수 심는 게 하루 일과 추사랑 한라봉 http://tv.ichannela.com/program/enter/meetnow/guest.html 이제만나러갑니다 신은하-김아라 “北에선 산꼭대기 나무 파내고 옥수수 심는 게 하루
- 1-1 섭씨온도를 화씨로 변환하는 프로그램 Ex1) 섭씨온도를 화씨온도로 전환하라 (F=(9/5)C+32) : Sub_to_Hwa.f95 PROGRAM Sub_to_Hwa ! Sub (F)" READ *, Sub Hwa = (9/5)*Sub+32 PRINT *, "Hwa =", Hwa, "C" END PROGRAM Sub_to_Hwa 자알 돌아갑니다~
- 1-2 지름을 이용하여 원 반지름, 원주길이, 면적계산 프로그램 . : PROGRAM Own !----------------------------------------------------------- ! ------------------------- IMPLICIT NONE REAL :: ji, banji, ownju, myun, pi pi=3.14159265 PRINT *, "Enter
- 1-3 병렬전압 구하는 프로그램 PROGRAM B_junab !----------------------------------------------------------- ! ---------------------------------------------------- IMPLICIT NONE REAL :: R1, R2, R3, T PRINT *, "Enter
- 2-3 로케트 발사 방향 구하는 프로그램 PROGRAM balsa IMPLICIT NONE REAL :: vzero, theta, time, x, y PRINT *, "Enter vzero, theta, time" READ time*COS(theta) y = vzero*time*SIN(theta) - 16*(time**2) PRINT *, "x is", x PRINT *, "y is", y END PROGRAM
- 2-1. 삼각형 둘레, 면적 구하는 프로그램 (면적 계산에는 Hero의 공식을 사용할 것: area = SQRT(s(s-a)(s-b)(s-c)) (단, s는 둘레의 반을 의미) PROGRAM triangle IMPLICIT NONE REAL :: a, b, c, s, dul, jung, myun PRINT *, "enter a, b, c" READ *, a, b, c dul = (a+b+c) s = dul/2
- 2-4 진동자 진동주기 구하는 프로그램 L(cm) a(degree) 120 15 90 20 60 5 74.6 10 83.6 12 PROGRAM jindong IMPLICIT NONE REAL :: L, a, P REAL, (a/2))**2) PRINT *, "P is", P END PROGRAM jindong
- 2-2 직렬전류 계산하는 프로그램 PROGRAM julu IMPLICIT NONE REAL :: I, E, R, L, C, f REAL, PARAMETER :: pi = 3.141593 PRINT *, "Enter READ *, E, R, C, f I = E / SQRT(R**2 + ((2*pi*f*L)-(1 / 2*pi*f*L))**2) PRINT *, "Amperes is", I END PROGRAM
- 3-1 이차방정식 프로그램 -B+SQRT(B2-4AC))/2A ============================================================================= PROGRAM QE IMPLICIT NONE REAL A, B, C, DC, R1, R2 PRINT *, "Enter t.......
1 페이지
다음 →