programatory:))

-> COL: uz to je na dnes stym zapichnem stacilo

-> COL: uz na tom pracujem:)

proste to musis predelat na else if

To je jednoduchy, protoze:



v prvnim ifu to spravne napise, ze neni kvadraticka a nespocte se D !!!!

to D se ale dal vyhodnocuje a pravdepodobne ma po deklaraci hodnotu 0 no a tak podle toho jede dal



ovsem i kdyby se spocetlo, tak to v tomhle pripade bude jedno, pac bude stejne 0.

-> COL: mam chut mu tam dat prikaz GO TO a na koniec a hotovo...

smarja.... ale v zasade ma pravdu :o)

ale aby ste ma zabili tak ked tam dosadim hodnoty a=0, b=0, c=0 tak mi to pise ze

Rovnica nieje kvadraticka



Rovnica ma dvojnasobny koren. Vysledok je -0.



a to zrejme nebude spravne:)

-> COL: v skole vraveli ze sa ten photran da dakde /ale nepytaj sa ma kde/ prepnut aj do rozhrania Ccka

ale jedine Ccko ktore ja poznam je na vodicaku

jeste, ze to neni C, to by hodilo v lepsim pripade warning, v horsim nic a delalo by to blbosti.



No kdo ma ale tusit, ze ve fortranu je == (jako v C), kdyz treba v pascalu je jen = :o)

-> COL: A ja na to cumim jak puk a nenapadne mi to

-> COL: idé

-> Nwkt: myška sa zmeni na "prst" a nehlasi to vobec nic

Nema tam bejt nahodou

if (D == 0 ) then

misto D=0? !!!



to by mohl byt ten expression error

a ostatni chyby jen plynou z toho, ze to neakceptuje ten prvni if

-> haso: Najeď myší nad ten křížek a napiš co to hlásí

mingw32-make.exe clean all

mingw32-make.exe: Nothing to be done for `clean'.

g95 -g kvadraticka_rovnica2.f90

In file kvadraticka_rovnica2.f90: 10



if (D=0) then

1

Error: Syntax error in IF-expression at (1)

In file kvadraticka_rovnica2.f90: 13



else if (D>0) then

1

Error: Unexpected ELSE IF statement at (1)

In file kvadraticka_rovnica2.f90: 17



else

1

Error: Unexpected ELSE statement at (1)

In file kvadraticka_rovnica2.f90: 19



end if

1

Error: Expecting END PROGRAM statement at (1)

mingw32-make.exe: *** [all] Error 1

a ktere 4? a hlasi to nejakou konkretni chybu?

-> COL: jj

-> haso: a zrusil jsi ten end if?

-> COL: to som spravil hned jak som si precital ten link od nwkt a skratka to namiesto troch podciarknutych riadkov s chybou vypisalo rovno 4 riadky

-> haso: Ja myslim, ze je tam nejaky problem s tim vnorenim ifu. Udelej tam "else if" na jeden radek a zrus jeden z tech "end ifu". Nic jinyho mne nenapada.

-> COL: jo ten IF v IF vie ten jazyk ale v skole sme robili len if v if a nie ze if v if a to cele vo velkom if

-> COL: tak akoze ja sa tu stym uz montujem snad polhodiny...napisal som aj kamaratovi ktoreho skratka programovanie vyslovene bavi a tiez skratka nevie stym robit tak nevie kde je chyba, ja stym robit neviem /vseobecne zrovna 01011011 mi do hlavy nejde / a tak uz to vzdavam

napisem profke mail kde jej poslem tento printscreen nech mi poradi



a nepytal by som sa na virte keby som nevycerpal vsetky moje moznosti...pretoze je mi jasne ze ten program je napisany spravne len je tam nejaka hlupa chyba

Ja bych mel strach z tech testu rovnosti realu (floatu) necemu.... ale pro ucel toho zapichu to bude snad fuk.

Jinak poradit ti nemuzu, neznam ten jazyk, ale vypada to celkem jednoduse, tak myslim, ze za pomoci netu to brzy vybadas.



A mas korektne napsanej ten IF v IFu? Umi to ten jazyk vubec?

Co blbnete, vzdyt treba v Turbo Pascalu se dalo docela psat.... Turbo C v nem snad bylo napsano (bez zaruky). Jo, pokud je nekdo uchyl na piontery (jak treba ja) tak se musi trochu zatnout.

-> COL: mna sa nepytaj keby sa dalo tak ja tomu pocitacu nic zadavat nebudem a tu rovnicu vyratam na papier takze nejake blizsie info ktomu programovaciemu jazyku sa ma nepytaj



edit: ja to potrebujem len na zapocet a pak zas uspesne zabudnem celu moju programovatelsku karieru trvajucu vzdy len jeden rok

Fortran nema nejaky bloky, jako C nebo pascal? bylo by to prehlednejsi.->



m8rinek: co? preci pascal neni tak hroznej, muzes v nem psat skoro jako v C, akorat veci jako *ptr++ se tam delaji obtizneji :o)

-> Nwkt: já se taky divil :) učit na vejšce výukovej jazyk pro děti :) www.fs.tul.cz/

-> m8rinek: Kde se proboha učí pascal?

-> m8rinek: no dal som tam else if a aj tak to pise chybu

-> Nwkt: Fortran taky neznam, zlaty C++ i kdyz ted na vejsce mame Pascal a to je podobna uchylnost

-> m8rinek: Photran is an Integrated Development Environment (IDE) for Fortran 77, 90, and 95 based on Eclipse and the CDT. The project is maintained by the University of Illinois at Urbana-Champaign and IBM.

takze else if na jeden radek a je to? to je ujetej jazyk :)))

vubec neznam photran, ale tam se nepouzivaj za koncem prikazu nejaky ,,oddelovace,, jako strednik?

-> haso: www.cs.mtu.edu/~shene/... /else-if.html

zoom

mam tu taky maly problem a nakolko programovanie skoro vobec nemusim

tak by som poprosil o pomoc...je to robene v Photrane



tak sa mi nejak zda ze ten program nevie ze kde sa zacina a konci ta dalsia podmienka...nepomoze mi stym dakto? myslim ze vtom bude len nejaka debilna chyba