Re: [問題] 排序法

[jubilee2 (3321)]

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)
→ jubilee2:照著latinboy說的程式碼
→ gilocustom:這樣的操作可以用cshift代替。