第一篇：Fortran語言編程小結(jié)
1.單雙精度 Program ex01 implicit none real(kind=4):: a real(kind=8):: b a=3.***66666666_4
!確定這個數(shù)字是使用單精度 b=3.***66666666_8
!確定這個數(shù)字是使用雙精度 write(*,*)a,b End program ex01
2.判斷kind值 program ex02 Implicit none
!判斷可以記錄9個位數(shù)的整數(shù)kind值
integer, parameter :: long_int = selected_int_kind(9)!判斷可以記錄3個位數(shù)的整數(shù)kind值 integer, parameter :: short_int = selected_int_kind(3)
!判斷可以有3個有效位數(shù), 指數(shù)可以記錄到3的浮點數(shù)kind值
integer, parameter :: long_real = selected_real_kind(10, 50)!判斷可以有10個有效位數(shù), 指數(shù)可以記錄到50的浮點數(shù)kind值
integer, parameter :: short_real= selected_real_kind(3, 3)integer(kind=long_int):: a = 123456 integer(kind=short_int):: b = 123 real(kind=long_real)
:: c = +1.23456789D45 real(kind=short_real)
:: d =+1230 write(*, “(I3,1X,I10)”)
long_int，a write(*, “(I3,1X,I10)”)
short_int, b write(*, “(I3,1X,E10.5)”)long_real, c write(*, “(I3,1X,E10.5)”)short_real, d END
3.TYPE program ex0434 implicit none Type :: person
!開始建立person這個類型
character(len=30):: name!人名
integer :: age
!年齡
integer :: height
!身高
INTEGER :: weight
!體重
character(len=80):: address!地址 End type person type(person):: a
!聲明一個person類型的變量 write(*,*)“NAME:” read(*,*)a%name write(*,*)“AGE:” read(*,*)a%age write(*,*)“HEIGHT:” read(*,*)a%height write(*,*)“WEIGHT:” read(*,*)a%weight write(*,*)“ADDRESS:” read(*,*)a%address write(*,100)a%name,a%age,a%height,a%weight 100 format(“Name:”,A10/,“Age:”,I3/,“Height:”,I3/,“Weight:”,I3/,&
“Addres:”,A80)End
4.REAL 與 INTEGER Program ex0431 implicit none
integer :: a=1
integer :: b=2
real
:: c
c=a/b!c=1/2=0, 雖然c是浮點數(shù),但因為a,b是整數(shù),計算a/b時會用整數(shù)去計算.write(*,“(F5.2)”)c End
5.DATA 變量表/初值表/，變量表/初值表/，… PROGRAM ex0430 IMPLICIT NONE INTEGER A REAL
B COMPLEX C CHARACTER(20)STR DATA A,B,C,STR /1, 2.0,(1.0,2.0), 'FORTRAN 77'/ WRITE(*,*)A,B，C,STR END
6.復數(shù)實虛部 Program ex0430 complex :: c =(1,2)write(*,100)real(c),'+',aimag(c),'i' 100 format(f5.1,a1,f5.1,a1)End
7.邏輯輸出 Program ex0416
logical a,b
a=.true.b=.false.write(*,100)a,b
format(L5,L4)End
8.Program ex0415
character(len=20)string
character(len=5)substring
string = “Have a nice day.”
substring = “nice”
write(*,*)ichar('A')!輸出字符A的ASCII碼
write(*,*)char(65)
!輸出ASCII碼65所代表的字符,也就是A
write(*,*)len(string)!輸出字符串string聲明時的長度
write(*,*)len_trim(string)!輸出字符串string內(nèi)容的長度
write(*,*)index(string, substring)!nice在Have a nice day的第8個位置 End
9.Program ex0414
character(len= 6)first
character(len=10)second
character(len=20)add
first=“Happy ”
second=“Birthday”
add = first//second!經(jīng)由兩個連續(xù)的除號可以連接兩個字符串
write(*,100)add
FORMAT('生日快樂',/,A)End
10.帶精度計算 Program ex0408
real(kind=8):: a,b
a=1
b=0.1
write(*,*)a,“+”,b,“=”,a+b End
11.邏輯if語句 Program ex0504 implicit none
integer rain, windspeed
logical r,w
write(*,*)“Rain:”
read(*,*)rain
write(*,*)“Wind:”
read(*,*)windspeed
r =(rain>=500)
!如果rain>=150, r=.true, 不然r=.false.w =(windspeed>=10)!如果windspeed>=10, w=.true, 不然w=.false.if(r.or.w)then
!只要r或w有一個值是true就成立
write(*,*)“停止上班上課”
else
write(*,*)“照常上班上課” End if End
12.Select Case用法 Program ex0512 implicit none
integer :: score
character grade
write(*,*)“Score:”
read(*,*)score
select case(score)
case(90:100)
grade='A'
case(80:89)
grade='B'
case default
grade='?'
End select
write(*,“('Grade:',A1)”)grade End
13.IF GOTO語句
PROGRAM ex0514 IMPLICIT NONE REAL height
REAL weight
WRITE(*,*)“height:” READ(*,*)
height
WRITE(*,*)“weight:” READ(*,*)
weight
IF(weight > height-100)GOTO 200 100 WRITE(*,*)“Under control.”
GOTO 300
200
WRITE(*,*)“Too fat!” 300 STOP END
14.DO WHILE 循環(huán) Program ex0604 implicit none
integer, parameter :: limit=10
integer counter
integer :: ans = 0
counter = 2
do while(counter <= limit)
ans = ans + counter
counter = counter + 2
end do
write(*,*)ans END
15.CYCLE,EXIT 語句 Program ex0609 implicit none
integer :: i,j
loop1: do i=1,3
loop2: do j=1,3
if(i==3)exit loop1
!跳離loop1循環(huán)
if(j==2)cycle loop2
!重做loop2循環(huán)
write(*, “('(',i2,',',i2,')')”)i, j
end do loop2
end do loop1 End
16.大小寫字符 Program ex0612 implicit none
integer i
integer strlen
character(len=20):: string
write(*,*)“String:”
read(*,*)string
strlen = LEN_TRIM(string)
do i = 1, strlen
string(i:i)= char(ichar(string(i:i))+32)
end do
write(*,“('encoded:',A20)”)string End
17.循環(huán)計算 Program ex0614 implicit none
real a,b,ans
character :: key = 'y'
！為了至少循環(huán)一次
do while(key=='y'.or.key=='Y')
read(*,*)a read(*,“(A1)”)key read(*,*)b select case(key)case('+')
ans = a+b case('-')
ans = a-b case('*')
ans = a*b
case('/')
ans = a/b case default
write(*,“('Unknown operator ',A1)”)key
stop end select
write(*,“(F6.2,A1,F6.2,'=',F6.2)”)a,key,b,ans write(*,*)“(Y/y)to do again.(Other)to exit.” read(*,“(A1)”)key
end do End
18.矩陣相加 pogram ex implicit none
integer, parameter :: row = 2
integer, parameter :: col = 2
integer :: matrixA(row,col)
integer :: matrixB(row,col)
integer :: matrixC(row,col)
integer r
integer c
write(*,*)“Matrix A”
do r=1, row
do c=1, col
write(*,“('A(',I1,',',I1,')=')”)r,c
read(*,*)matrixA(r,c)end do
end do
write(*,*)“Matrix B”
do r=1, row
do c=1, col
write(*,“('B(',I1,',',I1,')=')”)r,c
read(*,*)matrixB(r,c)end do
end do
write(*,*)“Matrix A+B=”
do r=1, row
do c=1, col
matrixC(r,c)= matrixB(r,c)+matrixA(r,c)
write(*,“('(',I1,',',I1,')=',I3)”)r,c,matrixC(r,c)end do
end do end pogram ex
[ write(*,“(I3,I3,/,I3,I3)”)((mc(i,j), i=1,2),j=1,2)]
19.program ex
implicit none
integer, parameter :: row = 2
integer, parameter :: col = 2
integer :: a(2,2)=(/ 1,2,3,4 /)
!a(1,1)=1, a(2,1)=2, a(1,2)=3, a(2,2)=4
integer :: b(4)=(/ 5,6,7,8 /)
integer :: c(2)
write(*,*)a,2)
write(*,*)a(:,1)
c = a(:,1)
!c(1)=a(1,1), c(2)=a(2,1)
write(*,*)c!c(1), c(2)
c = a(2,:)
!c(1)=a(2,1), c(2)=a(2,2)
write(*,*)c!c(1), c(2)
write(*,*)c(2:1:-1)
!c(2), c(1)
c = b(1:4:2)
!c(1)=b(1), c(2)=b(3)
write(*,*)c
!c(1), c(2)End
20.FORALL語句 Program ex Implicit none
integer :: I,J
integer, parameter :: size = 5
integer :: a(size,size)
forall(I=1:size, J=1:size, I>J)a(I,J)=1
!上半部分
forall(I=1:size, J=1:size, I==J)a(I,J)=2!對角線
forall(I=1:size, J=1:size, I !下半部分 write(*,“(5(5I5,/))”)a End 21.Allocatable Program EX Implicit none integer :: size, error=0 integer, parameter :: one_mb=1024*1024 !1MB character, allocatable :: a(:) Do size=size+one_mb! allocate(a(size), stat=error) if(error/=0)exit write(*,“('Allocate ',I10, ' bytes')”)size write(*,“(F10.2,' MB used')”)real(size)/real(one_mb) deallocate(a) End do End 22.Function 函數(shù) Program ex implicit none real :: a=10 real :: b=20 real :: add write(*,“(f6.2)”)add(a,b)End Function add(a,b)implicit none real :: a,b real :: add add = a*b End 23.SAVE語句 Program ex Implicit none call sub() call sub() call sub()End program Subroutine sub() Implicit none Integer :: count = 1 Save count !指定save變量永遠活著，不會忘記它的內(nèi)容 Write(*,*)count count = count+1 End [運行結(jié)果：1 2 3 ] 24.生成隨機數(shù) program ex implicit none interface!定義函數(shù)的接口 function random10(lbound, ubound)implicit none real :: lbound, ubound real :: random10(10) end function end interface real :: a(10) CALL RANDOM_SEED()!系統(tǒng)根據(jù)日期和時間隨機地提供種子 a = random10(1.0, 10.0) write(*,“(10F6.2)”)a end function random10(lbound, ubound)implicit none real :: lbound, ubound real :: len real :: random10(10) real t integer i len = ubound-lbound!計算范圍大小 do i=1,10 call random_number(t)!t會是0～1之間的隨機數(shù) random10(i)= lbound + len * t!把t轉(zhuǎn)換成lbound～ubound間的隨機數(shù) end do End 25.MODULE語句 Module global implicit none integer a,b common a,b End module Program ex0834 use global implicit none a=1 b=2 call sub()End program Subroutine sub() use global implicit none write(*,*)a,b return End subroutine 26.寫文件到text program ex0902 implicit none character(len=20):: string open(unit=10, file=“test.txt”) write(10,“(A20)”)“I LOVE YOU.”!寫到文件中 rewind(10) read(10,“(A20)”)string!從文件中讀出來 write(*,“(A20)”)string!寫到屏幕上 end 27.隨機成績 program gendata implicit none integer students integer i real r(3) write(*,“(4A5)”)“座位”,“語文”,“數(shù)學”,“英語” call random_seed() write(*,*)“How many students?” read(*,*)students do i=1,students call random_number(r) write(*,“(6I5)”)i,int(r*50+50) end do end program 復習內(nèi)容提綱 1.FORTRAN程序的結(jié)構(gòu)、書寫規(guī)則 FORTRAN程序的構(gòu)成（主程序和子程序）；FORTRAN77源程序的書寫格式。 2.數(shù)據(jù)類型及其運算 常量和變量的類型（整型、實型、雙精度型、復型、邏輯型、字符型）；定義變量類型的方法（用I－N規(guī)則隱式說明和顯式說明）；符號常量及其定義方法（PARAMETER語句）；運算符及運算優(yōu)先級；表達式（算術(shù)表達式、關(guān)系表達式、邏輯表達式和字符表達式）及其求值規(guī)則；不同類型數(shù)據(jù)的混合運算。 3.基本語句 賦值語句（算術(shù)、邏輯和字符型賦值語句）；表控格式的輸入和輸出；格式輸出：格式編輯符（X、I、F、E、A、/），格式的重復作用，格式語句與輸出語句（WRITE語句）的相互作用，在輸出語句中包含格式說明的方法；停止語句（STOP語句）；結(jié)束語句（END語句）；賦初值語句（DATA語句）；轉(zhuǎn)移語句（GO TO語句）；程序舉例。 4.選擇結(jié)構(gòu)程序設(shè)計 邏輯IF語句；塊IF結(jié)構(gòu)；選擇結(jié)構(gòu)的嵌套；程序舉例。 5.循環(huán)結(jié)構(gòu)程序設(shè)計 當型循環(huán)與直到型循環(huán)；用DO語句實現(xiàn)循環(huán)：DO語句時循環(huán)次數(shù)的計算，循環(huán)體的概念，循環(huán)終端語句和CONTINUE語句；DO WHILE 循環(huán)語句；用塊IF和GOTO語句實現(xiàn)循環(huán)；循環(huán)的嵌套；程序舉例。 6.數(shù)組的使用 定義數(shù)組的方法（用DIMENSION語句和類型語句定義一維或多維數(shù)組）；數(shù)組元素的正確引用；數(shù)組在內(nèi)存中存儲順序（按列存儲）；對數(shù)組賦初值的方法；數(shù)組的輸入與輸出；可調(diào)數(shù)組；程序舉例。 7.函數(shù)和子程序 內(nèi)部函數(shù)的調(diào)用方法；語句函數(shù)的定義及引用方法；函數(shù)子程序（FUNCTION子程序）的結(jié)構(gòu)及調(diào)用方法；子例行程序（SUBROUTINE子程序）的結(jié)構(gòu)及調(diào)用方法；模塊間的數(shù)據(jù)傳遞（虛實結(jié)合）；程序舉例。 8.數(shù)據(jù)聯(lián)系及文件 公用語句(COMMON語句)，無名公用區(qū)和有名公用區(qū)。 編程小結(jié) （一）一.累加：加數(shù)1+加數(shù)2+加數(shù)3+??+加數(shù)n（n個加數(shù)相加）假設(shè)我們用i表示我們的加數(shù)數(shù)目，例如：當i=9時，就表示加數(shù)9 模版：int i,sum=0;（注意：如果是分數(shù)或者小數(shù)sum就是float類型） for(i=1;i<=n;i++)（注意：循環(huán)變量的初值和遞變規(guī)律，也有 可能是i--,或者i+=2等等）{通項a；（通項：用一個通用的式子表示所有的加數(shù)）sum+=a;} printf(“%d”,sum);（注意：如果是float類型就是%f） 1、求1+2+3??+100的和，則通項a就是i。 分析：因為a就是i的值，所以這里不需要通項這一行了，因此整個大括號中間就只有一句話，所以大括號可以省略。整理之后就是： int i,sum=0;for(i=1;i<=100;i++)sum+=i;printf(“%d”,sum); 2、求2+4+6??+100的和。 分析：因為a就是i的值，所以這里不需要通項這一行了，因此整個大括號中間就只有一句話，所以大括號可以省略，再分析，再分析我們發(fā)現(xiàn)每個加數(shù)都是偶數(shù)，那么i的變化就是i+=2，并且i是從2開始變化，那么在賦值的時候就應(yīng)該是i=2。整理之后就是： int i,sum=0;for(i=2;i<=100;i+=2)sum+=i;printf(“%d”,sum); 3、求1+3+5??+99的和。 分析：因為a就是i的值，所以這里不需要通項這一行了，因此整個大括號中間就只有一句話，所以大括號可以省略，再分析，再分析我們發(fā)現(xiàn)每個加數(shù)都是奇數(shù)，那么i的變化就是i+=2。整理之后就是： int i,sum=0;for(i=1;i<=100;i+=2)sum+=i;printf(“%d”,sum); 4、求1+5+9+13+17+??的前100項的和，則通項為j+4，則程序為： int i,sum=0,j=1;for(i=1;i<=100;i++){ sum+=j;j=j+4； } printf(“%d”,sum);因為加數(shù)的第一項是1，所以賦初值的時候j=1,然后加數(shù)進行變化，變成5加到sum里面，所以這里要將通項和求和這兩句話互換位置。 5、求1+4+9+16+??的前100項的和 分析可知：每個加數(shù)就是對應(yīng)的加數(shù)數(shù)目的平方，則通項為i*i，則程序為： int i,sum=0;for(i=1;i<=100;i++)sum+= i*i;printf(“%d”,sum); 6、求1+（1+2）+（1+2+3）+（1+2+3+4）+??的前100項的和。 分析可知每一個加數(shù)本身又是一個累加的式子，進一步觀察可以發(fā)現(xiàn)，每個累加的式子都是加到這個加數(shù)所在的加數(shù)數(shù)目，即第35個加數(shù)就是1+2+3??+35，并且是在前面一個加數(shù)的基礎(chǔ)上加上這個加數(shù)所在的加數(shù)數(shù)目，也就是說第36個加數(shù)就是在前一個加數(shù)的基礎(chǔ)上加上36，即：1+2+3??+35+36。假設(shè)第k個加數(shù)是j,那么第k+1個加數(shù)就可以表示為j+（k+1），然后第k+2個加數(shù)就是j+（k+1）+（k+2）??那么我們的通項就可以表示為a=a+i,則程序為： int i,sum=0, a=0;for(i=1;i<=100;i++){ a+=i;sum+=a;} printf(“%d”,sum); 7、求1+1+2+3+5+8+13+21+??的前100項的和。 分析可知從第三個加數(shù)開始，每一個加數(shù)是其前兩個加數(shù)之和，假設(shè)第k個加數(shù)是m,第k+1個加數(shù)是n，然后第k+2個加數(shù)就是m+n，那么我們的通項就可以表示為a=m+n,但是要注意每次加數(shù)所對應(yīng)的m和n不一樣，所以我們要在求出每個加數(shù)之后，找出其對應(yīng)的m和n；再分析我們可以發(fā)現(xiàn)當前的n是下一次的m，當前的加數(shù)a是下一次的n，假設(shè)接著上面的推導，那么第k+3個加數(shù)就是n+（m+n），對應(yīng)我們的通項a=m+n，理解前面一句話。則程序為： int i,sum=0, m=1,n=1,a;for(i=3;i<=100;i++){ a=m+n;sum+=a;m=n;n=a;} printf(“%d”,sum); 8、求1+1/2+1/3+??+1/100 分析可知每一個加數(shù)就是我們的加數(shù)數(shù)目的倒數(shù)，則通項a就是1/i,我們說循環(huán)變量i一般定義為整型，那么1/i的結(jié)果就是整型，這樣的話小數(shù)點后面的就會被省略，所以正確的應(yīng)該寫為a=1.0/i，則程序為： int i;float sum=0;for(i=1;i<=100;i++){a=1.0/i;sum+=a;} printf(“%f”,sum); 9、求1+1/2+2/3+3/5+5/8+??的前100項的和。 分析可從第三個加數(shù)開始觀察，每一個加數(shù)的分母是其前一個加數(shù)的分子和分母之和，每一個加數(shù)的分子是其前一個加數(shù)的分母?？梢詫⒌谝粋€加數(shù)看成1/1，那么第二個加數(shù)也符合我們的規(guī)律,只有第一個不符合，那么我們可以先將第一個加數(shù)加到sum，然后再變下一個加數(shù)，但是要注意每次加數(shù)所對應(yīng)的分子和分母不一樣，所以我們要在求出每個加數(shù)之后，找出下一個加數(shù)所對應(yīng)的分子和分母。設(shè)通項表示為a=m/n, 那么下一個加數(shù)是n/(m+n)，然后下下一個加數(shù)就是(m+n)/(m+n+n)；再分析我們可以發(fā)現(xiàn)當前的分子和分母之和(m+n)是下一次的分母n，當前的分母n是下一次的分子m，注意這里在做數(shù)據(jù)交換的時候需要中間變量，對應(yīng)我們的通項a=m/n，理解前面一句話。則程序為： int i;float sum=0, m=1,n=1,t;for(i=1;i<=100;i++){ sum+=m/n;t=m+n;m=n;n=t;} printf(“%f”,sum); 二.累乘：乘數(shù)1*乘數(shù)2*乘數(shù)3*??*乘數(shù)n（n個乘數(shù)相乘）假設(shè)我們用i表示我們的乘數(shù)數(shù)目，例如：當i=9時，就表示乘數(shù)9 模版：int i,sum=1;（注意：如果是分數(shù)或者小數(shù)sum就是float類型） for(i=1;i<=n;i++)（注意：循環(huán)變量的初值和遞變規(guī)律，也有 可能是i--,或者i+=2等等）{通項a；（通項：用一個通用的式子表示所有的乘數(shù)）sum*=a;} printf(“%d”,sum);（注意：如果是float類型就是%f） 1、求1*2*3??*100的積，則通項a就是i。 分析：因為a就是i的值，所以這里不需要通項這一行了，因此整個大括號中間就只有一句話，所以大括號可以省略。整理之后就是： int i,sum=1;for(i=1;i<=100;i**)sum*=i;printf(“%d”,sum); 2、求2*4*6??*100的和。分析：因為a就是i的值，所以這里不需要通項這一行了，因此整個大括號中間就只有一句話，所以大括號可以省略，再分析，再分析我們發(fā)現(xiàn)每個乘數(shù)都是偶數(shù)，那么i的變化就是i+=2，并且i是從2開始變化，那么在賦值的時候就應(yīng)該是i=2。整理之后就是： int i,sum=1;for(i=2;i<=100;i+=2)sum*=i;printf(“%d”,sum); 3、求1*3*5??*99的和。 分析：因為a就是i的值，所以這里不需要通項這一行了，因此整個大括號中間就只有一句話，所以大括號可以省略，再分析，再分析我們發(fā)現(xiàn)每個乘數(shù)都是奇數(shù)，那么i的變化就是i+=2。整理之后就是： int i,sum=1;for(i=1;i<=100;i+=2)sum*=i;printf(“%d”,sum); 4、求1*5*9*13*17*??的前100項的積，則通項為j*4，則程序為： 分析：因為乘數(shù)的第一項是1，所以賦初值的時候j=1,然后乘數(shù)進行變化，變成5乘到sum里面，所以這里要將通項和求積這兩句話互換位置。 int i,sum=1,j=1;for(i=1;i<=100;i**){ sum*=j;j=j*4； } printf(“%d”,sum); 5、求1*4*9*16*??的前100項的積 分析可知：每個乘數(shù)就是對應(yīng)的乘數(shù)數(shù)目的平方，則通項為i*i，則程序為： int i,sum=1;for(i=1;i<=100;i**)sum*= i*i;printf(“%d”,sum); 6、求1*（1*2）*（1*2*3）*（1*2*3*4）*??的前100項的積。分析可知每一個乘數(shù)本身又是一個累乘的式子，進一步觀察可以發(fā)現(xiàn)，每個累乘的式子都是乘到這個乘數(shù)所在的乘數(shù)數(shù)目，即第35個乘數(shù)就是1*2*3??*35，并且是在前面一個乘數(shù)的基礎(chǔ)上乘上這個乘數(shù)所在的乘數(shù)數(shù)目，也就是說第36個乘數(shù)就是在前一個乘數(shù)的基礎(chǔ)上乘上36，即：1*2*3??*35*36。假設(shè)第k個乘數(shù)是j,那么第k+1個乘數(shù)就可以表示為j*（k+1），然后第k+2個乘數(shù)就是j*（k+1）*（k+2）??那么我們的通項就可以表示為a=a*i,則程序為： int i,sum=1, a=0;for(i=1;i<=100;i**){ a*=i;sum*=a;} printf(“%d”,sum); 7、求1*1*2*3*5*8*13*21*??的前100項的積。 分析可知從第三個乘數(shù)開始，每一個乘數(shù)是其前兩個乘數(shù)之和，假設(shè)第k個乘數(shù)是m,第k+1個乘數(shù)是n，然后第k+2個乘數(shù)就是m+n，那么我們的通項就可以表示為a=m+n,但是要注意每次乘數(shù)所對應(yīng)的m和n不一樣，所以我們要在求出每個乘數(shù)之后，找出其對應(yīng)的m和n；再分析我們可以發(fā)現(xiàn)當前的n是下一次的m，當前的乘數(shù)a是下一次的n，假設(shè)接著上面的推導，那么第k+3個乘數(shù)就是n*（m+n），對應(yīng)我們的通項a=m*n，理解前面一句話。則程序為： int i,sum=1, m=1,n=1,a;for(i=3;i<=100;i**){ a=m+n;sum*=a;m=n;n=a;} printf(“%d”,sum); 8、求1*1/2*1/3*??*1/100 分析可知每一個乘數(shù)就是我們的乘數(shù)數(shù)目的倒數(shù)，則通項a就是1/i,我們說循環(huán)變量i一般定義為整型，那么1/i的結(jié)果就是整型，這樣的話小數(shù)點后面的就會被省略，所以正確的應(yīng)該寫為a=1.0/i，則程序為： int i;float sum=1;for(i=1;i<=100;i**){a=1.0/i;sum*=a;} printf(“%f”,sum); 9、求1*1/2*2/3*3/5*5/8*??的前100項的積。 分析可從第三個乘數(shù)開始觀察，每一個乘數(shù)的分母是其前一個乘數(shù)的分子和分母之和，每一個乘數(shù)的分子是其前一個乘數(shù)的分母。可以將第一個乘數(shù)看成1/1，那么第二個乘數(shù)也符合我們的規(guī)律,只有第一個不符合，那么我們可以先將第一個乘數(shù)乘到sum，然后再變下一個乘數(shù)，但是要注意每次乘數(shù)所對應(yīng)的分子和分母不一樣，所以我們要在求出每個乘數(shù)之后，找出下一個乘數(shù)所對應(yīng)的分子和分母。設(shè)通項表示為a=m/n, 那么下一個乘數(shù)是n/(m+n)，然后下下一個乘數(shù)就是(m+n)/(m+n+n)；再分析我們可以發(fā)現(xiàn)當前的分子和分母之和(m+n)是下一次的分母n，當前的分母n是下一次的分子m，注意這里在做數(shù)據(jù)交換的時候需要中間變量，對應(yīng)我們的通項a=m/n，理解前面一句話。則程序為： int i;float sum=1, m=1,n=1,t;for(i=1;i<=100;i**){ sum*=m/n;t=m+n;m=n;n=t;} printf(“%f”,sum); 10、求1+（1*2）+（1*2*3）+（1*2*3*4）+??的前100項的和。 分析可知每一個加數(shù)本身是一個累乘的式子，進一步觀察可以發(fā)現(xiàn)，每個累乘的式子都是乘到這個乘數(shù)所在的乘數(shù)數(shù)目，即第35個乘數(shù)就是1*2*3??*35，并且是在前面一個乘數(shù)的基礎(chǔ)上乘上這個乘數(shù)所在的乘數(shù)數(shù)目，也就是說第36個乘數(shù)就是在前一個乘數(shù)的基礎(chǔ)上乘上36，即：1*2*3??*35*36。假設(shè)第k個乘數(shù)是j,那么第k+1個乘數(shù)就可以表示為j*（k+1），然后第k+2個乘數(shù)就是j*（k+1）*（k+2）??那么我們的通項就可以表示為a=a*i,再利用累加的模版，則程序為： int i,sum=0, a=1;for(i=1;i<=100;i**){ a*=i;sum+=a;} printf(“%d”,sum); 11、求1*（1+2）*（1+2+3）*（1+2+3+4）*??的前100項的積。 分析可知每一個乘數(shù)本身又是一個累加的式子，進一步觀察可以發(fā)現(xiàn)，每個累加的式子都是加到這個乘數(shù)所在的乘數(shù)數(shù)目，即第35個乘數(shù)就是1+2+3??+35，并且是在前面一個乘數(shù)的基礎(chǔ)上加上這個乘數(shù)所在的乘數(shù)數(shù)目，也就是說第36個乘數(shù)就是在前一個乘數(shù)的基礎(chǔ)上加上36，即：1+2+3??+35+36。假設(shè)第k個乘數(shù)是j,那么第k+1個乘數(shù)就可以表示為j+（k+1），然后第k+2個乘數(shù)就是j+（k+1）+（k+2）??那么我們的通項就可以表示為a=a+i, 再利用累乘的模版，則程序為： int i,sum=1, a=0;for(i=1;i<=100;i**){ a+=i;sum*=a;} printf(“%d”,sum); 三.最大值和最小值：數(shù)字0，數(shù)字1，數(shù)字2，??數(shù)字n-1（一共n個數(shù)字）假設(shè)我們用i表示我們的數(shù)字所在的位置，并且第一個位置是0，例如：當i=9時，就表示這個數(shù)字在第10個位子 模版： int i,max,a[n];（注意：如果是分數(shù)或者小數(shù)max和a[n]就是float 類型，注意這里定義的時候根據(jù)題目所給的具體數(shù)字把n換掉，千萬不可以寫a[n]o哦~~~~） for(i=0;i 了數(shù)字，就在定義的時候直接賦值，這個循環(huán)就不需要了；如果要求產(chǎn)生給數(shù)組賦a到b之間的隨機數(shù)，那么就用a[i]= a + rand()%(b-a);這句話代替這句。注意如果是float類型就是%f)max=a[0];for(i=0;i 1、求20個數(shù)字的最大值和最小值，要求賦1到100之間的隨機數(shù)，并且輸出它們及其下標。 分析：因為這里還要輸出其下標，所以還有定義一個row來存放，并且要對其賦值為0，因為我們給max賦值為a[0],則程序為： int i,max,min,a[20],row1=0,row2=0;for(i=0;i<20;i++)a[i]= 1+rand()%99;max=a[0];min=a[0];for(i=0;i<20;i++){ if(max 2、求4*5矩陣的最大值和最小值，要求賦值隨機數(shù)，并且輸出它們及其下標。分析：雖然這是一個二維的數(shù)組，但是其思路仍然和一維數(shù)組的一樣，區(qū)別只是這里需要用嵌套循環(huán)。要求還要輸出其下標，二維數(shù)組的下標是兩個，所以還要定義一個row和一個col來存放，并且要對它們賦值為0，因為我們給max賦值為a[0] [0],則程序為： int i,j,max,min,a[4] [5],row1=0,row2=0,col1=0,col2=0;for(i=0;i<4;i++)for(j=0;j<5;j++)a[i] [j]=rand();max=a[0] [0];min=a[0] [0];for(i=0;i<4;i++)for(j=0;j<5;j++){ if(max 3、求4*5矩陣的每一行最大值和最小值，要求賦值隨機數(shù)，并且輸出它們及其下標。 分析：雖然這是一個二維的數(shù)組，但是要求的是每一行的最大最小值，我們知道二維數(shù)組的每一行本身就是一個數(shù)組，那么我們就還需要一個控制行數(shù)的循環(huán)。要求還要輸出其下標，二維數(shù)組的下標是兩個，每一行的最大最小值其行號不就是i,所以還要定義一個存放列號的col，并且要對它賦值為0，因為我們給max賦值為每一行的第一個元素，也就是a[i] [0],則程序為： int i,j,max,min,a[4] [5],col1=0,col2=0;for(i=0;i<4;i++)for(j=0;j<5;j++)a[i] [j]=rand();for(i=0;i<4;i++)（這個循環(huán)是控制行的，里面的循環(huán)體本身就是一個求 一維數(shù)組的最大最小值的程序） {max=a[i] [0];min=a[i] [0];for(j=0;j<5;j++){ if(max 4、求4*5矩陣的每一列最大值和最小值，要求賦值隨機數(shù)，并且輸出它們及其下標。 分析：雖然這是一個二維的數(shù)組，但是要求的是每一列的最大最小值，二維數(shù)組的每一列可以看成一個數(shù)組，那么我們就還需要一個控制列數(shù)的循環(huán)。要求還要輸出其下標，二維數(shù)組的下標是兩個，每一列的最大最小值其列號不就是j,所以還要定義一個存放行號的row，并且要對它賦值為0，因為我們給max賦值為每一列的第一個元素，也就是a[0] [j],則程序為： int i,j,max,min,a[4] [5],row1=0,row2=0;for(i=0;i<4;i++)for(j=0;j<5;j++)a[i] [j]=rand();for(j=0;j<5;j++)（這個循環(huán)是控制列的，里面的循環(huán)體本身就是一個求 一維數(shù)組的最大最小值的程序）{max=a[0] [j];min=a[0] [j];for(i=0;i<4;i++){ if(max 5、排序(冒泡法)比如說 對于5個數(shù)字排序，首先要把5個數(shù)字放到一個一維的數(shù)組里面去 所以編程的前幾句為：int a[5] for(i=0;i<5;i++)scanf(“%d”,&a*i+); 那接下來就是排序了，為了方便理解就將數(shù)組實際化：比如 a[5]里面放著{7,9,0,12,3}那畫圖出來就是 a[5] a[0] a[1] a[2] a[3] a[4] ????????????那我們排序的方法是這樣的采用這樣幾步： 1，用a[0]與后面的（a[1]~a[4]里面的每一個成員比較即是說：a[0]~a[1]比較 a[0]~a[2]比較 a[0]~a[3]比較 a[0]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[0]小的就與他的位置交換 這部做完之后數(shù)組就應(yīng) 該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????2，用a[1]與后面的（a[2]~a[4]里面的每一個成員比較即是說： a[1]~a[2]比較 a[1]~a[3]比較 a[1]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[1]小的就與他的位置交換 這部做完之后數(shù) 組該是這個樣子：這個時候的a1不是我們賦初值時候的a1老就是我們改變后的數(shù)組所以這個時候的a1=9哦。 a[0] a[1] a[2] a[3] a[4] ???????????3，用a[2]與后面的（a[3]~a[4]里面的每一個成員比較即是說： a[2]~a[3]比較 a[2]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[2]小的就與他的位置交換 這部做完之后數(shù)組就應(yīng) 該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????4，用a[3]與后面的（a[4]~a[4]里面的每一個成員比較即是說： a[3]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[2]小的就與他的位置交換 這部做完之后數(shù)組就應(yīng) 該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????循環(huán)就是 寫成這個樣子的哦： for(i=0;i<4;i++) for(j=i+1;j<5;j++)if（a[i] {c=a[i];a[i]=a[j];a[j]=c;}（這個復合語句表示交換a[i]與a[j]進行交換）你把這個 循環(huán)好好的分析一下，當i=0 j可以?。? 2 3 4）那if是不是就是a0跟a1—a4之間的所有進行比較并且交換。其他的以此類推。 最后是不是要對排好序的數(shù)組進行輸出： for(i=0;i<5;i++)printf(“%d”,a*i+); 6、排序(選擇法)比如說 對于5個數(shù)字排序，首先要把5個數(shù)字放到一個一維的數(shù)組里面去 所以編程的前幾句為：int a[5] for(i=0;i<5;i++)scanf(“%d”,&a*i+); 那接下來就是排序了，為了方便理解就將數(shù)組實際化：比如 a[5]里面放著{7,9,0,12,3}那畫圖出來就是 a[5] a[0] a[1] a[2] a[3] a[4] ????????????那我們排序的方法是這樣的采用這樣幾步： 1，先把a[0]的下標儲存起來，即賦值給k，然后用a[0]與后面的比較 （a[1]~a[4]里面的每一個成員比較即是說：a[0]~a[1]比較 a[0]~a[2]比較 a[0]~a[3]比較 a[0]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[0]小的就把他的下標賦值給k，最后將a[0]和a[k]的位置交換，這步做完之后數(shù)組就應(yīng)該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????2，先把a[1]的下標儲存起來，即賦值給k，然后用a[1]與后面的比較 （a[2]~a[4]里面的每一個成員比較即是說： a[1]~a[2]比較 a[1]~a[3]比較 a[1]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[1]小的就把他的下標賦值給k，最后將a[1]和a[k]的位置交換 這步做完之后數(shù)組就應(yīng)該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????3，先把a[2]的下標儲存起來，即賦值給k，然后用a[2]與后面的比較 （a[3]~a[4]里面的每一個成員比較即是說：a[2]~a[3]比較 a[2]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[2]小的就把他的下標賦值給k，最后將a[2]和a[k]的位置交換 這步做完之后數(shù)組就應(yīng)該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????4，先把a[3]的下標儲存起來，即賦值給k，然后用a[3]與后面的比較（a[4]里面的每一個成員比較即是說： a[3]~a[4]比較）當后面的成員只要發(fā)現(xiàn)比a[3]小的就把他的下標賦值給k，最后將a[3]和a[k]的位置交換 這步做完之后數(shù)組就應(yīng)該是這個樣子： a[0] a[1] a[2] a[3] a[4] ???????????循環(huán)就是 寫成這個樣子的哦： for(i=0;i<4;i++) {k=i;for(j=i+1;j<5;j++) if（a[i] k=j;if（k!=i） {c=a[i];a[i]=a[j];a[j]=c;} }（這個復合語句表示交換a[i]與a[j]進行交換）把這個循環(huán)好好的分析一下,當i=0, j可以?。? 2 3 4）那if是不是就是a0跟a1—a4之間的所有進行比較并且交換。其他的以此類推。 最后是不是要對排好序的數(shù)組進行輸出： for(i=0;i<5;i++)printf(“%d”,a*i+); 四.尋找特殊的數(shù)字或解應(yīng)用題：輸出a到b之間的所有的具有某個特點的數(shù)字 模版： int n,a,b;（注意：如果是分數(shù)或者小數(shù)a和b就是float類型） scanf(“%d,%d”,&a,&b);(從鍵盤輸入查找的范圍；如果題目已經(jīng)給 了范圍，就在循環(huán)的時候直接帶值，這句話就不需要了。注意如果是float類型就是%f。注意如果運行程序，在輸入數(shù)據(jù)驗證的時候注意格式要匹配)for(n=a;n<=b;n++)（如果題目已經(jīng)給了具體的范圍,那么這里就根 據(jù)題目把a和b換掉）{if(條件)（注意：這句話是這類題目的核心，有時候也許不是一 句話，這句話放在這的意思是判定是否是特殊數(shù)字）printf(“%d”, n);（注意：如果是float類型就是%f）} 1、輸出3到1000之間的所有素數(shù) 分析：在做本題之前，先要搞明白什么是素數(shù)，它又是如何判定的。補充： 素數(shù) 又叫質(zhì)數(shù)，如果一個數(shù)只能被1和它本身整除，那么我們就說它是素數(shù)。分析：既然一個素數(shù)只可以被1和它本身整除，那么當我們判斷一個數(shù)n是不是素數(shù)的時候，就用這個數(shù)去除2到（n-1），一旦我們發(fā)現(xiàn)可以整除這個區(qū)間的某一個數(shù)，那么我們就不再去除別的數(shù)了，因為在2到（n-1）這個范圍內(nèi)，n可以整除其中的某一個數(shù)，那么就肯定不是素數(shù)。這個過程需要一個循環(huán)和停止循環(huán)的break來實現(xiàn)。繼續(xù)分析，當我們在2到（n-1）這個范圍內(nèi)找不到n可以整除的數(shù)，那么就說明這個數(shù)是素數(shù)，那么我們就判斷上面的循環(huán)時候做完了，如果中間就跳出循環(huán)，則說明不是素數(shù)，反之，如果做完了，那么就是素數(shù)。P判斷能否整除，就是求余看是否為0，則程序如下： int n;（n是要判斷的數(shù)，具體根據(jù)題意賦值或從鍵盤輸入）for(i=2;i 上面的循環(huán)有沒有做完)本題分析：只要用上面的程序替換掉模版的那個if就可以了，注意這里不再需要else了，因為題目只要求輸出素數(shù)，輸出語句也只需要一句，則程序如下： int n,i;for(n=3;n<=1000;n++){ for(i=2;i 2、輸出1到100之間的所有同構(gòu)數(shù) 分析：在做本題之前，先要搞明白什么是同構(gòu)數(shù)，它又是如何判定的。補充： 同構(gòu)數(shù) 如果一個數(shù)出現(xiàn)在自己的平方數(shù)的右邊，那么我們就說它是同構(gòu)數(shù)。分析：既然一個同構(gòu)數(shù)會出現(xiàn)在它自己的平方數(shù)的右邊，那么當我們判斷一個數(shù)n是不是同構(gòu)數(shù)的時候，先要做的就是求出這個數(shù)的平方，然后該怎么判斷是不是出現(xiàn)在右邊呢？我們?nèi)擞醒劬?，可以直接看，但是電腦不長眼睛的，它看不到，它只能分析，那么它怎么分析呢？1到100之間的所有數(shù)只有一位或者兩位，那么我們在取平方數(shù)右邊的時候，只要取這個平方數(shù)的最右邊的一位或者兩位，與我們的數(shù)進行比較，看是否一樣，如果一樣就是同構(gòu)數(shù)，反之就不是。怎么取一個數(shù)的最右邊一位或者兩位呢？求余?。∫粋€數(shù)對10求余就是取它的最右邊一位，也就是個位；如果對100求余就是取它的最右邊兩位，也就是十位和個位。則程序如下： int n;（n是要判斷的數(shù)，具體根據(jù)題意賦值或從鍵盤輸入）if(n*n%10==n|| n*n %100==n)printf(“%d is a isomorphic number!n”,n);本題分析：直接帶模版，則程序如下： int n;for(n=1;n<=100;n++){ if(n*n%10==n|| n*n %100==n)printf(“%d is a isomorphic number!n”,n);}（這里的大括號實際是可以去掉的，不去掉也沒有關(guān)系） 3、輸出1到1000之間的所有回文數(shù) 分析：在做本題之前，先要搞明白什么是回文數(shù)，它又是如何判定的。補充： 回文數(shù) 如果一個數(shù)字正讀和倒讀一樣，那么這個數(shù)字就是回文數(shù)。例如：98789, 這個數(shù)字正讀是98789,倒讀也是98789,所以這個數(shù)字就是回文數(shù)。 分析：既然一個回文數(shù)正讀和倒讀一樣，也就是它的最高位和最低位一樣，它的次高位和次低位一樣，那么當我們判斷一個數(shù)n是不是回文數(shù)的時候，先要確定這個數(shù)有幾位，才可以確定誰與誰進行比較，然后確定這個數(shù)每一位都是誰。1到1000之間的數(shù)，除了1000其余最多三位數(shù)，顯然1000不是回文數(shù)，先不考慮，怎么確定這個數(shù)是幾位呢？如果它的百位是0，那么肯定不是三位數(shù)，如果百位和十位都是0，那么肯定是一位數(shù)，我們知道一位數(shù)肯定都是回文數(shù)；對于一個兩位數(shù)，只要判斷它的個位和十位是不是一樣就可以了，如果一樣，那么肯定是回文數(shù)；對于一個三位數(shù)只要判斷他的個位和百位就可以了，如果一樣就是回文數(shù)。求一個最多是三位數(shù)的每一位，就是將這個數(shù)對10求余得到個位；然后這個數(shù)除以10，再對10求余得到十位；最后除以100得到百位。則程序如下： int n;（n是要判斷的數(shù)，具體根據(jù)題意賦值或從鍵盤輸入）if(n>0&&n<10)printf(“%d is a huiwen number!n”,n);else if(n/100==0){if(n/10==n%10)printf(“%d is a huiwen number!n”,n);} else if(n/100==n%10)printf(“%d is a huiwen number!n”,n);本題分析：只要用上面的程序替換掉模版的那個if就可以了，則程序如下： int n;for(n=1;n<=1000;n++){ if(n>0&&n<10)printf(“%d is a huiwen number!n”,n);else if(n/100==0){if(n/10==n%10)printf(“%d is a huiwen number!n”,n);} else if(n/100==n%10)printf(“%d is a huiwen number!n”,n);} 4、輸出1到1000之間的所有完數(shù) 分析：在做本題之前，先要搞明白什么是完數(shù)，它又是如何判定的。補充： 再做完數(shù)之前先講怎么求兩個數(shù)的最大公約數(shù)和最小公倍數(shù)。 分析：假設(shè)求a和b兩個數(shù)的最大公約數(shù)和最小公倍數(shù)，并且a>b，如果a 5、輸出1到999之間的所有水仙花數(shù) 分析：在做本題之前，先要搞明白什么是水仙花數(shù)，它又是如何判定的。補充： 水仙花數(shù) 如果一個三位數(shù)的各個位數(shù)字的立方和等于該數(shù)字本身，那么這個數(shù)就是水仙花數(shù)。例如：153,1*1*1+5*5*5+3*3*3=153，所以這個數(shù)字就是回文數(shù)。分析：既然一個水仙花數(shù)的各個位數(shù)字的立方和等于該數(shù)字本身，那么當我們判斷一個數(shù)n是不是水仙花數(shù)的時候，先要求出各個位數(shù)字，然后求其立方和，判斷是不是和該數(shù)本身一樣，如果一樣就是水仙花數(shù)，否則就不是。求一個三位數(shù)的每一位，就是將這個數(shù)對10求余得到個位；然后這個數(shù)除以10，再對10求余得到十位；最后除以100得到百位。則程序如下： int n,a,b,c;（n是要判斷的數(shù)，具體根據(jù)題意賦值或從鍵盤輸入）a=n/100;b=n/10%10;c=n%10;if(a*a*a+b*b*b+c*c*c==n)printf(“%d is the shuixianhua number!n”,n);本題分析：只要用上面的程序替換掉模版的那個if就可以了，則程序如下： int n;for(n=1;n<=1000;n++){ a=n/100;b=n/10%10;c=n%10;if(a*a*a+b*b*b+c*c*c==n)printf(“%d is the shuixianhua number!n”,n);} 6、用一張100的錢換100張零鈔，假設(shè)面額有5元，3元，1/2元三種，問有多少種方法？ 分析：這是一道解方程組的題，根據(jù)我們的小學知識可以列出方程組，其中有三個未知數(shù)，所以應(yīng)該是三層嵌套循環(huán)，再分析題目我們知道1/2的張數(shù)只能是偶數(shù)張，則程序為： int i,j,k,n;for(i=0;i<=20;i++)for(j=0;j<=33;j++)for(k=0;k<=100;k++)if(5*i+3*j+k/2==100&&i+j+k==100&&k%2==0){ printf(“%d,%d,%dn”,i,j,k);n++;} printf(“There are %d changes!n”,n); 7、愛因斯坦階梯問題。設(shè)有一階梯，每步跨2階，最后剩1階；每步跨3階，最后剩2階；每步跨5階，最后剩4階；每步跨6階，最后剩5階；每步跨7階，正好到階梯頂。問滿足條件的最少階梯數(shù)是多少？ 分析：這道題的實質(zhì)是找滿足上述條件的數(shù)，而且要最小的，那么我們就寫一個循環(huán)，循環(huán)變量從最小的數(shù)開始遞增，分析題目我們可知從7開始遞增即可（如果不從7，從1開始也是可以的），一旦滿足上述條件，循環(huán)變量就不需要增加了，輸出循環(huán)變量即可，所以我們選擇while循環(huán)結(jié)構(gòu)，當不滿足上述條件我們就做循環(huán)變量的遞增，如果滿足就輸出，則程序為： int n=7;while(!(n%2==1&&n%3==2&&n%5==4&&n%6==5&&n%7==0)){ n++;} printf(“%dn”,n); 8、求一句英文所含有的單詞數(shù)。 分析：一句英文里面每個單詞之間都用空格隔開，所以我們只要數(shù)空格的個數(shù)即可，但是注意最后一個單詞后面是沒有空格的。一句英文肯定要存放在數(shù)組中，我們選擇簡單的一維數(shù)組。從字符數(shù)組中的第一個元素開始查看，先查看第一個元素，如果不是空格，那就證明是第一個單詞，單詞個數(shù)加一，然后一直做循環(huán)，直到遇到空格，就說明這個單詞結(jié)束了，然后再判斷是不是到數(shù)組的結(jié)尾，如果沒有就繼續(xù)查找，直到數(shù)組結(jié)束為止，則程序如下： #include } 五.圖案：輸出n行的具有規(guī)律的字符，組成我們所想要的圖案。模版： int i,j,k;for(i=0;i 具體對待）for(k;;)printf(“%d”,);（注意：如果是char類型就是%c）} 1、輸出下列圖案 * *** ***** printf(“ There are %d words.n”,num);******* ********* ******* ***** *** * 分析：這種圖案一般我們會將其分為兩部分，從最多一行隔開，分為上下兩個部分，先輸出上面的圖案，再輸出下面的。通過分析我們可以發(fā)現(xiàn)每行既要輸出空格，又要輸出*，所以循環(huán)體里面需要兩個循環(huán)，循環(huán)體里面的循環(huán)變量的控制最好和外層的控制行數(shù)的循環(huán)變量相關(guān)聯(lián)。我們用i控制行數(shù)，用j控制每行的空格數(shù)，用k控制每行的*數(shù)，通過觀察我們發(fā)現(xiàn)如下規(guī)律： i j k 0 4 1 1 3 3 2 2 5 3 1 7 4 0 9 那么，i+j=4，k均為奇數(shù)，再分析發(fā)現(xiàn)k=2i+1，每行輸完還要輸出換行，則程序如下： int i,j,k;for(i=0;i<5;i++){ for(j=0;j<4-i;j++)printf(“ ”);for(k=0;k<2*i+1;k++)printf(“*”);printf(“n”);} for(i=0;i<4;i++){ for(j=0;j 2、輸出下列圖案 A BBB CCCCC DDDDDDD EEEEEEEEE FFFFFFF GGGGG HHH I 分析：這種圖案一般我們會將其分為兩部分，從最多一行隔開，分為上下兩個部分，先輸出上面的圖案，再輸出下面的。通過分析我們可以發(fā)現(xiàn)每行既要輸出空格，又要輸出字母，所以循環(huán)體里面需要兩個循環(huán)，循環(huán)體里面的循環(huán)變量的控制最好和外層的控制行數(shù)的循環(huán)變量相關(guān)聯(lián)。我們用i控制行數(shù)，用j控制每行的空格數(shù)，用k控制每行的字母數(shù)，通過觀察我們發(fā)現(xiàn)如下規(guī)律： i j k 0 4 1 1 3 3 2 2 5 3 1 7 4 0 9 那么，i+j=4，k均為奇數(shù)，再分析發(fā)現(xiàn)k=2i+1。每行的字母相同但是和上下行的不相同，觀察發(fā)現(xiàn)字母是按照順序遞增的，那么我們就先把字母存放在一個變量里面，然后在輸出每行所需的字符之后，改變字母。每行輸完還要輸出換行，則程序如下： int i,j,k;char c=’A’;for(i=0;i<5;i++){ for(j=0;j<4-i;j++)printf(“ ”);for(k=0;k<2*i+1;k++)printf(“%c”,c);c++;printf(“n”);} for(i=0;i<4;i++){ for(j=0;j 3、輸出下列圖案 121 12321 1234321 123454321 1234321 12321 121 1 分析：這種圖案一般我們會將其分為兩部分，從最多一行隔開，分為上下兩個部分，先輸出上面的圖案，再輸出下面的。通過分析我們可以發(fā)現(xiàn)每行既要輸出空格，又要輸出數(shù)字，所以循環(huán)體里面需要兩個循環(huán)，循環(huán)體里面的循環(huán)變量的控制最好和外層的控制行數(shù)的循環(huán)變量相關(guān)聯(lián)。我們用i控制行數(shù)，用j控制每行的空格數(shù)，用k控制每行的數(shù)字數(shù)，每行的數(shù)字還不相同，觀察發(fā)現(xiàn)數(shù)字是按照順序遞增遞減的，那么我們輸出數(shù)字的循環(huán)又要分為兩個循環(huán)，繼續(xù)觀察我們發(fā)現(xiàn)每次輸出的數(shù)字和循環(huán)變量k有關(guān)，通過觀察我們發(fā)現(xiàn)如下規(guī)律： i j k 0 4 1 1 3 2 2 2 3 3 1 4 4 0 5 那么，i+j=4，k均為奇數(shù)，再分析發(fā)現(xiàn)k的遞增從1開始到i+1為止，遞減是從i開始到1為止。每行輸完還要輸出換行，則程序如下： int i,j,k;for(i=0;i<5;i++){ for(j=0;j<4-i;j++)printf(“ ”);for(k=1;k<=i+1;k++)printf(“%d”,k);for(k=i;k>0;k--)printf(“%d”,k);printf(“n”);} for(i=0;i<4;i++){ for(j=0;j 4、輸出九九乘法表 1*1=1 1*2=2 2*2=4 1*3=3 2*3=6 3*3=9 1*4=4 2*4=8 3*4=12 4*4=16 ?? ?? 分析：如果用i表示行，j表示列，那么每行輸出i個式子，分析發(fā)現(xiàn)每個式子可以用j*i表示。每行輸完還要輸出換行，則程序如下： int i,j;for(i=1;i<10;i++){ for(j=1;j<=i;j++)printf(“%d*%d=%dt”,j,i,j*i);printf(“n”);} 5、輸出楊輝三角的前10行 1 1 1 2 1 1 3 3 1 1 4 6 4 1 1 5 10 10 5 1 1 6 15 20 15 6 1 7 21 35 35 21 7 1 8 28 56 70 56 28 8 1 9 36 84 126 126 84 36 9 1 分析：如果用i表示行，j表示列，那么每行輸出i個數(shù)字，分析發(fā)現(xiàn)除了兩頭的數(shù)字為1以外，其余的每個數(shù)字每個數(shù)字等于上一行的左右兩個數(shù)字之和，所以用二維數(shù)組比較簡單。每行輸完還要輸出換行，則程序如下： int a[10][10],i,j;for(i=0;i<10;i++){ for(j=0;j<=i;j++){ if(i==j||j==0)a[i][j]=1;else a[i][j]=a[i-1][j]+a[i-1][j-1];printf(“%dt”,a[i][j]);} printf(“n”);} 五.字符串操作： 1.函數(shù)的原型說明為int chrn(char *s,char c);，其功能是測試c在s中出現(xiàn)的次數(shù)，編制該函數(shù)并用相應(yīng)的主調(diào)函數(shù)對其進行測試。#include第二篇：Fortran語言復習大綱
第三篇：編程小結(jié)