Fortran di Giuseppe Ciaburro guida dal 04-06-2002
economia
news e media
viaggi
informatica
internet
salute e
benessere
int
rattenimento
e spettacolo
sport
tempo
libero
istruzio
ne
e formazione
arte
cultura
scienza
Le categorie della guida
- Algoritmi (21)
- Calcolo Numerico (1)
- Compilatori (13)
- Corsi online (5)
- Convertitori (19)
- FAQ (1)
- Fortran (36)
- Fortran 77 (11)
- Fortran 90 (18)
- Fortran 2003 (4)
- Libri in italiano (6)
- Libri in inglese (17)
- Link Fortran (11)
- Manuali in italiano (8)
- Manuali in inglese (62)
- Miscellanea (35)
- Principianti (15)
- Librerie Fortran (3)
- Programmi (80)
- Sicurezza (13)
- Software (33)
- Speciali (10)
- Windows (9)
- Fortran News (2)
- Linux (7)
- Source Codes in F90 (10)
I link preferiti della guida
Il Sondaggio
Quale versione del fortran utilizzi?
Programmi
Tavola Pitagorica
A cura di Giuseppe Ciaburro
Pubblicato il 14/05/2007
GENERA UNA TAVOLA PITAGORICA DELLE DIMENSIONI N VOLUTE CON N<10
*GENERA UNA TAVOLA PITAGORICA DELLE DIMENSIONI N VOLUTE CON N<10
INTEGER P(10,10)
WRITE(*,*)'INTRODUCI LA DIMENSIONE N VOLUTA'
READ(*,*) N
DO 10 I=1,N
DO 10 J=1,N
P(1,J)=I*J
10 CONTINUE
WRITE(*,*)'ECCO LA TAVOLA PITAGORICA RICHIESTA'
DO 20 I=1,N
WRITE(*,45) (P(I,J),J=1,N)
20 CONTINUE
45 FORMAT(/2X,10I5)
STOP
END
Feed 
