Kurs FORTRANU | ||
---|---|---|
Předcházející | Další |
S těmito znalostmi už můžeme napsat jednoduchý program. Jakou řeší úlohu?
program p1 ! prvni program real :: a,b,c,d,e,x1,x2 a = 1.0 b = 2.0 c = -3.0 d = b**2 - 4.0*a*c e = sqrt(d) x1 = (-b + e)/2.0/a xy = (-b - e)/2.0/a write(*,*) "Hledane reseni: ",x1,x2 end
Předcházející | Domů | Další |
Základní prvky jazyka | Řízení toku programu |