作者jubilee2 (3321)
看板Fortran
標題Re: [問題] 排序法
時間Thu Nov 24 01:12:28 2011
subroutine c(k,a,n)
real a(n)
integer k,i,n
real temp
temp=a(1)
do i=2,k
a(i-1)=a(i)
end do
a(k)=temp
end
--
※ 發信站: 批踢踢實業坊(ptt.cc)
◆ From: 111.255.164.215
※ 編輯: jubilee2 來自: 111.255.164.215 (11/24 01:23)
1F：→ jubilee2:照著latinboy說的程式碼 11/24 01:26
2F：→ gilocustom:這樣的操作可以用cshift代替。 11/24 10:55