| | |
| Stránka: 1 z 1
| [ Príspevkov: 3 ] | |
Autor | Správa |
---|
Registrovaný: 28.10.09 Prihlásený: 25.02.13 Príspevky: 8 Témy: 2 |
mam za ulohu vyriesit sustavu dvoch rovnic ax+by= c a dx+ ey=f na vstupe sa zadaju a,b,c,d,e,f samo o sebe by to nebol problem ale ked jedo z nich je 0 tak tak to spadne vedel by mi niekto poradit ako to spravit aby to viriesilo aj v tedy ked na vstupe bude aj 0?
program linrov;
var a,b,c,d,e,f,x,y:real;
begin readln (a,b,c,d,e,f); x:= (f*b-c)/(b*d-a); y:=(c-a*x)/b; writeln ('x= ',x,' a y= ',y); readln; end.
|
|
Registrovaný: 16.05.07 Prihlásený: 01.08.17 Príspevky: 837 Témy: 6 | Napísal juho: 02.11.2009 18:26 | |
|
tak zaprve: malo by to padat len ked je nulove b a (b*d-a)
tak zadruhe: este pred priradeniami daj zlozenu podmienku pre tie vyrazy co su hore a ked je podmienka splnena tak sa vypise ze sa to neda vypocitat alebo mozes aj specifikovat pre Inf rieseni.
_________________ getch();?{readkey;?} na konci? !A naco! Riesenie je (Alt+F5)
99% pochopí a shaggy je druhá kategória |
|
Registrovaný: 28.10.09 Prihlásený: 25.02.13 Príspevky: 8 Témy: 2 | Napísal autor témy Arsenius: 02.11.2009 22:56 | |
|
no jasneee ja som uplen zabudol, ze menovatel sa nemoze rovnat nule...velmi pekne ti dakujem
|
|
| Stránka: 1 z 1
| [ Príspevkov: 3 ] | |
| Nemôžete zakladať nové témy v tomto fóre Nemôžete odpovedať na témy v tomto fóre Nemôžete upravovať svoje príspevky v tomto fóre Nemôžete mazať svoje príspevky v tomto fóre
|
|