Fortran95 < Technische Inform. < Praktische Inform. < Hochschule < Informatik < Vorhilfe
|
| Status: |
(Frage) überfällig  | | Datum: | 11:19 Di 05.05.2009 | | Autor: | thadod |
Liebes Matheraum Team und liebe Informatiker.
Ich habe gerade ein kleines Problem. Und zwar sollen wir mit Fortran95 eine quadratische Gleichung mit der pq Formel lösen.
Mein Problem ist folgendes:
Ich habe ein Unterprogramm geschrieben, bei welchem zunächst die Koeffizienten a,b,c eingelesen werden sollen.
P.S. [mm] ax^2+bx+c
[/mm]
Für den Fall, dass jmd. a=0 eingibt soll Fortran95 hiermit kann ich nicht rechnen printen.
Ich hatte zunächst folgendes hierfür geschrieben:
if (a=0) then
print*, 'hiermit kann ich nicht rechnen'
...
allerdings wurde mir nun gesagt, dass ich eine Schleife für den Fall erzeugen soll, dass jmd. so lustig ist und nochmal a=0 eingibt.
Hierfür gibt es ja den do while Befehl. Doch wie kann ich den am besten schreiben???
Ich habe zunächst folgendes hierfür:
...
print*, Geben Sie bitte einen Wert für a ein!
read*, a
do while (a=0)
print*, Damit kann ich nicht rechnen.
end do
print*, Geben Sie bitte einen Wert für b ein!
read*, b
print*, Geben Sie bitte einen Wert für c ein!
read*, c
...
P.S. es geht nur um den do while Befehl. Er soll solange hiermit kann ich nicht rechnen printen, solange man halt auch a=0 eingibt. Dannach soll er dann nach den weiteren Koeffizienten b und c fragen.
Ich hoffe das Ihr mir helfen könnt.
MFG thadod
|
|
| |
|
| Status: |
(Mitteilung) Reaktion unnötig  | | Datum: | 11:20 Do 07.05.2009 | | Autor: | matux |
$MATUXTEXT(ueberfaellige_frage)
|
|
|
|
