1 laboratoriya ish. Dasturlash texnologiyasi

var

a,b,c: integer;

x,d: real;

begin

repeat

write('Введите коэффициент a (a<>0): ');

readln(a);

until a<>0;

write('Введите коэффициент b: ');

readln(b);

write('Введите коэффициент c: ');

readln(c);

d:=b*b-4*a*c;

writeln('Решение уравнения:');

if d=0 then

writeln('Корень один: х = ',-b/2/a) else

if d<0 then

writeln('Корней на множестве действительных чисел нет') else

begin

writeln('Корней два:');

writeln('1-й корень: x1 = ',(-b-sqrt(d))/2/a);

writeln('2-й корень: x1 = ',(-b+sqrt(d))/2/a);

end;

readln;

end.

Java

1. 
   import java.util.Scanner;
   
2. 
   public class KvadratnoeUravnenie {
   
3. 
   public static void main(String[] args) {
   
4. 
   Scanner in = new Scanner(System.in);
   
5. 
   double a, b, c, d;
   
6. 
   double x1, x2;
   
7. 
   System.out.println("Введите а: ");
   
8. 
   a = in.nextDouble();
   
9. 
   System.out.println("Введите b: ");
   
10. 
    b = in.nextDouble();
    
11. 
    System.out.println("Введите c: ");
    
12. 
    c = in.nextDouble();
    
13. 
    d = Math.pow(b, 2) - (4 * a * c);
    
14. 
    if (d>0){
    
15. 
    x1 = ((-1) * b + Math.sqrt(d)) / 2 * a;
    
16. 
    x2 = ((-1) * b - Math.sqrt(d)) / 2 * a;
    
17. 
    System.out.printf("x1 = " + x1 + " x2 = " + x2);}
    
18. 
    else if (d == 0){
    
19. 
    x1 = (-1) * b;
    
20. 
    System.out.printf("x1, x2 = " + x1); }
    
21. 
    else
    
22. 
    System.out.print("Ошибка. D меньше нуля");}}
    

C++

1. 
   #include // подключаем cin/cout
   
2. 
   #include // подключаем sqrt
   
3. 
   using namespace std;
   
4. 
   int main()
   
5. 
   {
   
6. 
   double a,b,c,d,x1,x2; // Объявляем переменные с плавающей точкой.
   
7. 
   cout << "Введите a\n"; // Вводим исходные данные
   
8. 
   cin >> a;
   
9. 
   cout << "Введите b\n";
   
10. 
    cin >> b;
    
11. 
    cout << "Введите c\n";
    
12. 
    cin >> c;
    
13. 
    d = b * b - 4 * a * c; // Рассчитываем дискриминант
    
14. 
    if (d > 0) // Условие при дискриминанте больше нуля
    
15. 
    {x1 = ((-b) + sqrt(d)) / (2 * a);
    
16. 
    x2 = ((-b) - sqrt(d)) / (2 * a);
    
17. 
    cout << "x1 = " << x1 << "\n";
    
18. 
    cout << "x2 = " << x2 << "\n";}
    
19. 
    if (d == 0) // Условие для дискриминанта равного нулю{
    
20. 
    x1 = -(b / (2 * a));
    
21. 
    cout << "x1 = x2 = " << x1 << "\n";}
    
22. 
    if (d < 0) // Условие при дискриминанте меньше нуля
    
23. 
    cout << "D < 0, Действительных корней уравнения не существует";}