Fortran 90

Elementarz - pierwsze programy

Poniżej znajdują się przykłady bardzo prostych programów. Przed przystąpieniem do poznawania kolejnych instrukcji języka, umożliwiających (nareszcie) rozwiązywanie bardziej skomplikowanych zagadnień, należy upewnić się, czy każda linia w tych prostych programach jest zrozumiała. Warto też zwrócić uwagę na sposób pisania instrukcji: program powinien być czytelny.
Każdy z tych programów można poddać modyfikacjom, np. zmienić treść komunikatu, zmienić nazwy zmiennych, zmienić typ zmiennych (np. z INTEGER na REAL), itd.

Pisanie na ekranie...PRINT
pierwszy.f90
Bardzo proste obliczenia...deklaracje: IMPLICIT NONE, INTEGER
drugi.f90
Ten sam program można zapisać w bardziej skondensowanej postaci, umieszczając kilka instrukcji w jednej linii. Tak napisany program nie jest zbyt czytelny...ale działa tak samo jak pierwszy.
drugi_inaczej.f90
Natomiast wstawienie dwóch spacji w deklaracji (int eger zamiast integer) powoduje prawdziwą burzę i lawinę błędów kompilacji. Czy potrafimy wytłumaczyć co się złego stało?
drugi_error.f90
Powracamy do poprawnej wersji programu, tym razem umieszczając w nim inicjalizację wartości zmiennych w linii deklaracji.
drugi_bis.f90
Wczytanie wartości zmiennych. Zamiana wartości dwóch zmiennych...READ
zamiana.f90
Obliczanie pola i obwodu koła o zadanym promieniu. PARAMETER...
kolko.f90
Na podstawie tego przykładu można napisać kolejne programy:
- dla danej wartości promienia r wyznaczyć pole powierzchni oraz objętość kuli;
- dla danej wartości a oznaczającej bok sześcianu, obliczyć pole powierzchni, obwód oraz długość przekątnej sześcianu;
- dla dwóch wartości oznaczonych a i b obliczyć pole i obwód prostokąta oraz długość jego przekątnej;
- dla dwóch wartości r i h obliczyć pole powierzchni oraz objętość cylindra o promieniu podstawy r oraz wysokości h;
- rozwiązać podobne zadanie dla stożka.
Być może podczas pisania tych programów okaże się, że nie bardzo wiadomo jak zapisać w Fortranie niektóre wzory, np. pierwiastek. O tym oraz pokrewnych zagadnieniach rzecz będzie w następnym rozdziale.