Ecuatia de gradul 1 in Pascal

ecuatie, learn, Pascal

In acest tutorial veti invata cum sa scrieti un program care rezolva o ecuatie de gradul 1. Ca o pranteza, mai puteti invata cum sa rezolvati ecuatiile de gradul 1 si 2 in ActionScript2 aici. Dar sa revenim la codul sursa al programului nostru in Pascal:

program ecuatie_de_gradul_intai;
var a,b,x:real;
begin
writeln('Ecuatia de gradul I: ax+b=0');
writeln;
write('Introduceti o valoare pentru a: ');
readln(a);
write('Introduceti o valoare pentru b: ');
readln(b);
if a=0 then
writeln('Ecuatia nu are sens')
else
begin
x:=-b/a;
writeln('Valoarea lui x este: ',x);
end;
Readln;
end.

In continuare va voi explica programul. Deoarece ecuatia este de forma ax+b=0, la inceputul prgramului citim valorile lui a si b. Am explicat deja procedeul in tutorialul precedent.

Urmeaza o conditie if care verifica daca a este diferit de 0. Daca nu este diferit de 0, se afiseaza mesajul corespunzator iar programul se termina. Daca este diferit de 0, se calculeaza si se afiseaza valoarea lui x:

begin
x:=-b/a;
writeln('Valoarea lui x este: ',x);
end;

Ti-a placut articolul Ecuatia de gradul 1 in Pascal?

Ai nevoie de rezolvarea unei probleme la informatica?

Iti recomandam si urmatoarele articole:

• Ecuatia de gradul 2 in Pascal
• Cum sa compari 2 numere in Pascal
• Teorema lui Pitagora in Pascal
• Program de calculare a mediei in Pascal
• Atestat Informatica – Pascal/C/C++ – P. 3