integer list of variables
real list of variables
double precision list of variables
complex list of variables
logical list of variables
character list of variables
º¯¼ö ¸ñ·ÏÀº º¯¼ö À̸§À» ½°Ç¥·Î ³ª´©¾î ³õÀº °ÍÀÌ´Ù. °¢°¢ÀÇ º¯¼ö´Â Á¤È®ÇÏ°Ô ÇÑ ¹ø¸¸ ¼±¾ðÇÏ¿©¾ß ÇÑ´Ù. ¾î¶² º¯¼ö°¡ ¼±¾ðµÇÁö ¾ÊÀ¸¸é ±× Á¾·ù¸¦ °áÁ¤ÇÏ´Â ¹¬½ÃÀûÀÎ ±ÔÄ¢ (implicit rules)ÀÌ ÀÖ´Ù. º¯¼ö À̸§ÀÌ ¹®ÀÚ i-nÀ¸·Î ½ÃÀÛÇϸé Á¤¼ö(integer)ÀÌ°í ±× ¿ÜÀÇ °æ¿ì´Â ½Ç¼ö(real)ÀÌ´Ù.
¿À·¡ µÈ ¸¹Àº Fortran 77 program¿¡¼ ÀÌ ±ÔÄ¢À» »ç¿ëÇÑ´Ù. ±×·¯³ª ´õ ÀÌ»ó À̸¦ »ç¿ëÇÏÁö ¸»¾Æ¾ß ÇÑ´Ù. º¯¼ö¸¦ ¼±¾ðÇÏÁö ¾ÊÀ¸¸é ¿À·ù°¡ »ý±æ È®·üÀº ¾öû³ª°Ô Å©´Ù.
Fortran 77¿¡´Â real°ú double precisionÀ̶ó´Â ¼·Î ´Ù¸¥ µÎ °¡Áö ÇüÅÂÀÇ ºÎµ¿ ¼Ò¼öÁ¡ (floating point) º¯¼ö°¡ ÀÖ´Ù. º¸Åë realÀÌ Àû´çÇÏÁö¸¸ Á»´õ Á¤¹ÐÇÑ °è»êÀ» ÇÏ¿©¾ß ÇÑ´Ù¸é double precisionÀ» »ç¿ëÇÏ¿©¾ß ÇÑ´Ù. º¸Åë realÀº 4 byte º¯¼öÀ̰í double precisionÀº 8 byteÀÌÁö¸¸ ±â°è¿¡ µû¶ó ´Ù¸£´Ù. ¾î¶² ºñÇ¥ÁØ Fortran¿¡¼´Â 8 byte ºÎÅë ¼Ò¼öÁ¡ º¯¼ö¸¦ ³ªÅ¸³¾ ¶§ real*8¸¦ »ç¿ëÇϱ⵵ ÇÑ´Ù.
program circle
real r, area, pi
parameter (pi = 3.14159)
c This program reads a real number r and prints
c the area of a circle with radius r.
write (*,*) 'Give radius r:'
read (*,*) r
area = pi*r*r
write (*,*) 'Area = ', area
stop
end
¸Å°³º¯¼ö¹®(parameter)ÀÇ Çü½ÄÀº
parameter (name = constant, ... , name = constant)
À̰í ÀÌ¿¡ °üÇÑ ±ÔÄ¢Àº
A5, 5A, VARIABLE, XY3Z4Q, AT&T, NUMBER1, NO1, NO 1, NO_1, STOP