|
|
Fortran'a Giriş
|
Fortran da en basit program aşağıdaki gibidir. Fortran da programın arasına daha sonra kodlarımızı incelemek isteyen olurse yorumlar yazmak isteyebiliriz. Yorumlar ! işareti ile başlar ve 132 karakteri geçmemelidir. ! ile başlayıp devam eden yazılarınızı fortran dikkate bile almaz. (Not:Bazı compilerlar da ! yerine "c" de kullanılabilir.)
!Fortran da ana programimiza "program" ve ardindan istedigimiz ismi verebiliriz.
!Burada ben Merhaba ismini koymayi tercih ettim.
!Program isimlerinde bosluk ve Turkce karakter kullanmayin.
program Merhaba
!Ekrana bir sey yazdirmak istedigimizde genelde print*,"Yazi" yada print*,deger yazmayi tercih ederiz.
!Sadece print* yaparsak bir satir atla komutunu vermis oluruz.
print*,"Merhaba Fortran"
!Programi sonlandirmak icin "end program" i kullaniriz.
!Burada dikkat edilmesi gereken bir durum söz konusu.
!end program dan sonra yazacagimiz program ismi bastaki program ismi ile bire bir ayni olmalidir.
!(Kucuk harf buyuk harf onemli)
end program Merhaba |
programın kodu (merhaba_fortran.txt)
çalışan version (merhaba_fortran.exe)
Şimdi biraz daha ilerleyelim ve iki sayının toplamını bize veren bir programı inceleyelim. Bundan sonraki birçok örnekte sayıyı toplayacağız. 
program sayi_toplamaca
!Burada dikkat edilecek durum, programin kullanici dostu olmasi
!onun için bolbol print veya write komutunu kullanarak
!kullanıcıya ne yapması gerektigini soylememiz gerekmektedir.
!Bir sonraki komutla ekrana Toplamak istediginiz sayiyi giriniz: yazmis olacagiz.
print*,"Toplamak istediginiz iki sayiyi giriniz:"
!Burada asil isi read komutu yapar.
!Bu komutla kullanicinin klavye yardimi ile yazdigi yaziya ardindan
!enter a bastiginda yazilan degerleri sirasiyla alir, a ve b ye esitler.
read*,a,b
!ardindan c degerini a ve bnin toplamina esitler.
c=a+b
!bir onceki komutla hesapladigimiz c yi ekrana yazdirir.
print*,"Toplam=",c
end program sayi_toplamaca |
Fortran da kullanabileceğiniz birkaç önemli işlem:
Bunların bir çoğunu tahmin etmek zor değil ama olsun.
• "+" Toplama
• "-" Çıkarma
• "*" Çarpma
• "/" Bölme
• "**" Üssünü alma |
|
|
|
