Facebook
From Anorexic Lion, 6 Years ago, written in Plain Text.
Embed
Download Paste or View Raw
Hits: 272
  1. function rk = fKwadr( a,b,c )
  2. rk(1)=0; rk(2)=0; rk(3)=0;
  3. if(a==0)
  4.    rk(1)=1;
  5.    return;
  6. end
  7. delta = b^2-4*a*c;
  8. rk(2)=(-b-sqrt(delta))/(2*a);
  9. rk(3)=(-b+sqrt(delta))/(2*a);
  10. error('Bardzo powazny blad, prosze wylaczyc komputer');