Yeni Kayıt
Konudaki Resimler
|
|
_____________________________
|
Bildirim
Fortran'da yardıma ihtiyacım var.
Sıcak Fırsatlarda Tıklananlar
Editörün Seçtiği Fırsatlar
Daha Fazla 
Bu Konudaki Kullanıcılar:
Daha Az 
2 Misafir - 2 Masaüstü
Giriş
Mesaj
-
-
4389,.nv.,., m. ,mva,.f mf as,.f as,.nfa .as.,fasf
< Bu mesaj bu kişi tarafından değiştirildi rob dö şambır -- 30 Nisan 2013; 14:28:20 >_____________________________ -
Dediğim gibi yeni başladığım için nelerden bahsetmem gerektiğini bile tam olarak bilmiyorum. Force 3.0 ile yazdım, çalıştır butonunda ki derleme kısmına bastıktan sonra hata sayısını 0 olarak gösteriyor fakat unkown error yazıyor. Output kısmında çıkan yazı ise şu; C:\Users\Faint Smile\Desktop\Fortran programları\Akım ölçer.f:3:
real*8 E, R, F, L, C, pi, I
1
C:\Users\Faint Smile\Desktop\Fortran programları\Akım ölçer.f:9: (continued):
parameter(pi=3.14d0)
2
Invalid declaration of or reference to symbol `pi' at (2) [initially seen at (1)]
C:\Users\Faint Smile\Desktop\Fortran programları\Akım ölçer.f:4:
E=1.0d0
1
C:\Users\Faint Smile\Desktop\Fortran programları\Akım ölçer.f:9: (continued):
parameter(pi=3.14d0)
2
Statement at (2) invalid in context established by statement at (1)
Not: Telepati yoluylada anlatırdım ama hava çok bozdu bu akşam, sinyalleri yollayamıyorum
_____________________________
-
parameter(pi=3.14d0) nin yerini değiştirince sorun düzeldi, real*8'in bir alt satırına aldım sadece. Neden düzeldi bilmiyorum, içgüdüsel olarak deniyim bi dedim. Yinede teşekkürler uğraşanlar olduysa.
program akim_olcer
implicit none
real*8 E, R, F, L, C, pi, I
parameter(pi=3.14d0)
E=1.0d0
R=2.0d0
F=3.0d0
L=4.0d0
C=5.0d0
I=E/(R**2.0d0+(2.0d0*pi*F*L-1.0d0/
*(2.0d0*pi*F*C))**2.0d0)**(0.5d0)
write(*,*) I
stop
end
Not: Bu fortran çok ilkel bir dil galiba, herkes öyle söylüyor. İşime yarar mı sizce? Fizik bölümünde okuyorum, akademisyen olacağım._____________________________ -
quote:
Orijinalden alıntı: LastHope
parameter(pi=3.14d0) nin yerini değiştirince sorun düzeldi, real*8'in bir alt satırına aldım sadece. Neden düzeldi bilmiyorum, içgüdüsel olarak deniyim bi dedim. Yinede teşekkürler uğraşanlar olduysa.
program akim_olcer
implicit none
real*8 E, R, F, L, C, pi, I
parameter(pi=3.14d0)
E=1.0d0
R=2.0d0
F=3.0d0
L=4.0d0
C=5.0d0
I=E/(R**2.0d0+(2.0d0*pi*F*L-1.0d0/
*(2.0d0*pi*F*C))**2.0d0)**(0.5d0)
write(*,*) I
stop
end
Not: Bu fortran çok ilkel bir dil galiba, herkes öyle söylüyor. İşime yarar mı sizce? Fizik bölümünde okuyorum, akademisyen olacağım.
Hocam hangi üni?Ben bil müh ve Fizik çift anadal yapmayı düşünüyorum(daha çok var amacım koç).Haangi üni_____________________________ Forumun yazılım altyapısı o kadar mükemmel ki imzanın bile tamamı çıkmıyorArrested Development-Band of Brothers-Boardwalk Empire-Black Books-Breaking Bad-Brooklyn Nine-Nine-Chuck-Da Vinci's Demons-Dexter-Eastbound
-
quote:
Orijinalden alıntı: Professional Geek
quote:
Orijinalden alıntı: LastHope
parameter(pi=3.14d0) nin yerini değiştirince sorun düzeldi, real*8'in bir alt satırına aldım sadece. Neden düzeldi bilmiyorum, içgüdüsel olarak deniyim bi dedim. Yinede teşekkürler uğraşanlar olduysa.
program akim_olcer
implicit none
real*8 E, R, F, L, C, pi, I
parameter(pi=3.14d0)
E=1.0d0
R=2.0d0
F=3.0d0
L=4.0d0
C=5.0d0
I=E/(R**2.0d0+(2.0d0*pi*F*L-1.0d0/
*(2.0d0*pi*F*C))**2.0d0)**(0.5d0)
write(*,*) I
stop
end
Not: Bu fortran çok ilkel bir dil galiba, herkes öyle söylüyor. İşime yarar mı sizce? Fizik bölümünde okuyorum, akademisyen olacağım.
Hocam hangi üni?Ben bil müh ve Fizik çift anadal yapmayı düşünüyorum(daha çok var amacım koç).Haangi üni
Biraz geç oluyor ama, istanbul üni :D_____________________________
Sayfa:
1
Ip işlemleri
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
Bu mesaj IP'si ile atılan mesajları ara Bu kullanıcının son IP'si ile atılan mesajları ara Bu mesaj IP'si ile kullanıcı ara Bu kullanıcının son IP'si ile kullanıcı ara
KAPAT X
