👤
WINDRAYZEREN
a fost răspuns

Elaborati un program in pascal care va calcula ecuatia de gradul I: ax+b=0 *

Răspuns :

STEFANRADU2005EN

var a,b,x : real;

begin

readln (a,b);

if a<>0 then

begin

x:=-b/a;

writeln('Ecuatia are o singura radacina', x);

end;

if (a=0)and (b=0) then

writeln('Ecuatia are o multime infinita de radacini');

if (a=0) and (b<>0) then

writeln ('Ecuatia nu are sens');

end.

Vă mulțumim că ați vizitat site-ul nostru dedicat Informatică. Sperăm că informațiile oferite v-au fost de ajutor. Dacă aveți întrebări sau nevoie de asistență suplimentară, nu ezitați să ne contactați. Vă așteptăm cu drag data viitoare și nu uitați să ne adăugați la favorite!


En Learnings: Alte intrebari