Fortran - Variabel

Variabel tidak lain adalah nama yang diberikan ke area penyimpanan yang dapat dimanipulasi oleh program kami. Setiap variabel harus memiliki tipe tertentu, yang menentukan ukuran dan tata letak memori variabel; kisaran nilai yang dapat disimpan dalam memori itu; dan set operasi yang dapat diterapkan ke variabel.

Nama variabel dapat terdiri dari huruf, angka, dan karakter garis bawah. Nama di Fortran harus mengikuti aturan berikut -

  • Tidak boleh lebih dari 31 karakter.

  • Ini harus terdiri dari karakter alfanumerik (semua huruf alfabet, dan angka 0 hingga 9) dan garis bawah (_).

  • Karakter pertama nama harus berupa huruf.

  • Nama tidak peka huruf besar / kecil.

Berdasarkan tipe dasar yang dijelaskan pada bab sebelumnya, berikut adalah tipe variabel -

Sr Tidak Jenis & Deskripsi
1

Integer

Itu hanya dapat menampung nilai integer.

2

Real

Ini menyimpan angka floating point.

3

Complex

Ini digunakan untuk menyimpan bilangan kompleks.

4

Logical

Ini menyimpan nilai Boolean logis.

5

Character

Ini menyimpan karakter atau string.

Deklarasi Variabel

Variabel dideklarasikan di awal program (atau subprogram) dalam pernyataan deklarasi tipe.

Sintaks untuk deklarasi variabel adalah sebagai berikut -

type-specifier :: variable_name

Sebagai contoh

integer :: total  	
real :: average 
complex :: cx  
logical :: done 
character(len = 80) :: message ! a string of 80 characters

Nanti Anda dapat menetapkan nilai ke variabel ini, seperti,

total = 20000  
average = 1666.67   
done = .true.   
message = “A big Hello from Tutorials Point” 
cx = (3.0, 5.0) ! cx = 3.0 + 5.0i

Anda juga dapat menggunakan fungsi intrinsik cmplx, untuk menetapkan nilai ke variabel kompleks -

cx = cmplx (1.0/2.0, -7.0) ! cx = 0.5 – 7.0i 
cx = cmplx (x, y) ! cx = x + yi

Contoh

Contoh berikut menunjukkan deklarasi variabel, tugas dan tampilan di layar -

program variableTesting
implicit none

   ! declaring variables
   integer :: total      
   real :: average 
   complex :: cx  
   logical :: done 
   character(len=80) :: message ! a string of 80 characters
   
   !assigning values
   total = 20000  
   average = 1666.67   
   done = .true.   
   message = "A big Hello from Tutorials Point" 
   cx = (3.0, 5.0) ! cx = 3.0 + 5.0i

   Print *, total
   Print *, average
   Print *, cx
   Print *, done
   Print *, message
   
end program variableTesting

Ketika kode di atas dikompilasi dan dijalankan, itu menghasilkan hasil sebagai berikut -

20000
1666.67004    
(3.00000000, 5.00000000 )
T
A big Hello from Tutorials Point