fortran語言第5章共8章-資料下載頁
2025-05-10 14:03本頁面
【正文】 。其函數(shù)的結果值為字符在相應處理系統(tǒng)中的字符序號，例如 IACHAR(′A′)的值為 65 IACHAR(′Z′)的值為 90 在 FORTRAN90中，允許 String所代表的字符長度超過 1，此時只取第一個字符作為有效字符。例如， ICHAR(′ABC′)的值為 65。 (2)字符序號向字符轉化函數(shù) 其一般形式為： CHAR(I)和 ACHAR(I) 其中 I可以是整型常量、變量或表達式。其函數(shù)的結果值為序號 I所對應的字符。例如 ACHAR(65)的值為 ′A′ IACHAR(90)的值為 ′Z′ 字符處理應用舉例 例 在讀入的一批單詞中，把以字母 ′B′開頭的打印出來，直到輸入 ′ZZZ′結束。 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ī)律將一個字符轉換為另一個字符。收報人則按相反的規(guī)律轉換得到原來的字符。例如，將字母 ′A′→′F′ ， ′B′→′G′ ， ′C′ →′H′ ，即將一個字母變成其后第五個字母。例如： ″HE IS IN BEIJING.″ 應轉換為： ″MJ NX NS GJNONSL.″ 分析：可以這樣實現(xiàn)，取該字母的 ASCII代碼，加上5，再按其 ASCII碼轉換為另一個字母。為此可用IACHAR函數(shù) (或 ICHAR函數(shù) )和 ACHAR函數(shù) (或CHAR函數(shù) )。 IACHAR(′A′)=65， ACHAR(70)= ′F′。還有一個問題要處理：當字母為 ′V′時，加 5就超過了 ′Z′，故應使之轉換為 ′A′，同理， ′W′→′B′ ，′X′→′C′ ， ′Y′→′D′ ， ′Z′→′E′ 。只對字母進行轉換，對字母之外的字符維持原樣。 邏輯型數(shù)據(jù) 邏輯常量只有真和假兩種值： . .FALSE.。變量說明的格式為： LOGICAL [ ( [ KIND = ] 類別值 ) ] [ [ ,屬性列表 ] :: ] 變量列表 邏輯型變量可以定義為 LOGICAL， LOGICAL(1)，LOGICAL(2)， LOGICAL(4) LOGICAL DOIT, DONT LOGICAL(2) :: IIS, IIF LOGICAL*4 :: FLAG1, FLAG2 例 當某點的 X， Y坐標落在下圖（圖 ）中四個方塊內(nèi)和方塊邊上時， Z=0，如在方塊外， Z=3。 INTEGER::Z LOGICAL::P,Q,R,S READ*,X,Y Z=3 P=X== Q=X== R=Y== S=Y== IF(().OR.().OR.()amp。 .OR.())Z=0 PRINT*,39。X=39。,X,39。Y=39。,Y,39。Z=39。,Z END 上機作業(yè) ，按從小到大順序輸出。 ，分別統(tǒng)計出其中的英文字母、空格、數(shù)字和其它字符的個數(shù)。 ，頂點為 X， Y， Z，其坐標分別為（ ,） ,（ ,） ,（ ,） 。求三角形面積和三角形重心。 （提示：重心坐標 = ,利用復數(shù)計算） 3zyx ??謝謝觀看！ ? 更多網(wǎng)絡共享資源： ?
畢業(yè)設計相關推薦
鄂ICP備17016276號-1