freepeople性欧美熟妇, 色戒完整版无删减158分钟hd, 无码精品国产vα在线观看DVD, 丰满少妇伦精品无码专区在线观看,艾栗栗与纹身男宾馆3p50分钟,国产AV片在线观看,黑人与美女高潮,18岁女RAPPERDISSSUBS,国产手机在机看影片

正文內(nèi)容

fortran語言第5章共8章(參考版)

2025-05-14 14:03本頁面
  

【正文】 求三角形面積和三角形重心。 ,分別統(tǒng)計出其中的英文字母、空格、數(shù)字和其它字符的個數(shù)。Z=39。Y=39。X=39。 INTEGER::Z LOGICAL::P,Q,R,S READ*,X,Y Z=3 P=X== Q=X== R=Y== S=Y== IF(().OR.().OR.()amp。 邏輯型數(shù)據(jù) 邏輯常量只有真和假兩種值: . .FALSE.。還有一個問題要處理:當字母為 ′V′時,加 5就超過了 ′Z′,故應使之轉(zhuǎn)換為 ′A′,同理, ′W′→′B′ ,′X′→′C′ , ′Y′→′D′ , ′Z′→′E′ 。為此可用IACHAR函數(shù) (或 ICHAR函數(shù) )和 ACHAR函數(shù) (或CHAR函數(shù) )。例如,將字母 ′A′→′F′ , ′B′→′G′ , ′C′ →′H′ ,即將一個字母變成其后第五個字母。 PROGRAM CHAR_2 IMPLICIT NONE CHARACTER*10::WORD DO READ*,WORD IF(WORD==′ZZZ′)EXIT IF(WORD(1:1)==′B′)PRINT*,WORD END DO END PROGRAM CHAR_2 也可以用 INDEX函數(shù): PROGRAM CHAR_2 IMPLICIT NONE CHARACTER*10::WORD DO READ*,WORD IF(WORD==′ZZZ′)EXIT IF(INDEX(WORD, ′B′)==1)PRINT*,WORD END DO END PROGRAM CHAR_2 例 翻譯密碼 為了保密,常不采用明碼電文,而用密碼電文,按事先約定的規(guī)律將一個字符轉(zhuǎn)換為另一個字符。其函數(shù)的結果值為序號 I所對應的字符。例如, ICHAR(′ABC′)的值為 65。例如 ADJUSTL(′ ABC ′)的值為 ′ABC ′ ADJUSTR(′ABC ′)的值為 ′ ABC′ (1)字符向字符序號轉(zhuǎn)化函數(shù) 其一般形式為: ICHAR(CH)和 IACHAR(CH) 其中 CH是長度為 1的字符型常量和變量。例如, LGE(′ABC′, ′EFG′)的值為假。例如, INDEX(′FOLLOW ME′, ′ME′)的值為 8,因為 ′ME′的第一個字符 M出現(xiàn)在 ′FOLLOW ME′的第 8個字符位置上; INDEX(′FOLLOW ME′, ′L O′)的值為 0。例如 TRIM(′ABC ′)的值為 ′ABC′ TRIM(′ ABC ′)的值為 ′ ABC′ 3.子串位置函數(shù) (INDEX) 其一般形式為: INDEX(String1, String2) 其中 String1, String2均為字符型,且類別參數(shù)應該一致。函數(shù) LEN_TRIM的值是把字符串去掉尾部空格后的長度。 用于字符處理的內(nèi)部函數(shù) 1.求字符串長度函數(shù) (LEN和 LEN_TRIM) LEN(String)和 LEN_TRIM(String) 其中 String為字符型常量、變量等字符串。 (3)若兩個字符串中字符個數(shù)不等時,則將較短的字符串后面補足空格后再比較。若所有字符完全相同,則兩表達式相等;否則,以第一次出現(xiàn)不同字符的比較結果為準。 在進行關系運算時,遵循以下規(guī)律: (1)兩個單個字符比較,以它們的代碼值決定大小。 PROGRAM CHAR_1 IMPLICIT NONE CHARACTER(LEN=5)::A,B,C CHARACTER(LEN=11)::D A=′CHINA′ B=′JAPAN′ C=A D=A//′ ′//B PRINT*, A,B,C END PROGRAM CHAR_1 字符關系表達式 字符比較的規(guī)則是:一般按其 ASCII代碼的值 (見附錄 )進行比較。該運算符是一個雙目
點擊復制文檔內(nèi)容
畢業(yè)設計相關推薦
文庫吧 www.dybbs8.com
備案圖鄂ICP備17016276號-1