# Так сойдёт?
from math import sqrt
print('Введите коэффициенты a, b, c для ax^2 + bx + c = 0 в виде "a b c", где коэффициент а не равен 0')
a, b, c = list(map(int, input().split())) # здесь поменяй ввода квадратного уравнения, если другой нужен
D = b ** 2 - 4 * a * c # дискриминант
if D < 0:
print("Нет решений")
elif D == 0:
x = (-1 * b + sqrt(D)) / (2 * a)
print("Уравнение имеет одно решение:", x)
else:
x1 = (-1 * b + sqrt(D)) / (2 * a)
x2 = (-1 * b - sqrt(D)) / (2 * a)
print("Уравнение имеет два решения:", x1, "и", x2)
Поделитесь своими знаниями, ответьте на вопрос:
Описание 3. «Виртуалды мәшиненің қандай түрлерібар?» деген тақырыпта хабарлама жаса.Олардың бір-бірінен айырмашылығықандай?3. Компьютерді пайдалануда программалықжабдықтамаларды дұрыс таңдауқаншалықты маңызды деп ойлайсың? Бағабер.4. Программалық жабдықтамалар дегенімізне?5. Программалық жабдықтамалардыңқандай түрлері бар?6.Қолданбалы программа дегеніміз не?7. Танымал қолданбалы программалықжабдықтамалардың қандай түрлерінбілесің?8. Компьютердің техникалықсипаттамаларын білудің қандай жолдарыбар?9. Программалық жабдықтамаларқолданылуына байланысты қалай бөлінеді?10. Программалық жабдықтамалардыкомпьютердің жылдамдығына әсер
program calc;
var
sum,raz,umn,celx1,celx2,ostx1,ostx2,korenx1,korenx2:real;
N,x1,x2:integer;
begin
write('Введите номер операции: ');
readln(N);
case N of
1:begin
write('Введите первое число: ');
readln(x1);
write('Введите второе число: ');
readln(x2);
sum:=x1+x2;
writeln('Сумма чисел = ',sum);
end;
2:begin
write('Введите первое число: ');
readln(x1);
write('Введите второе число: ');
readln(x2);
raz:=x1-x2;
writeln('Разность чисел = ',raz);
end;
3:begin
write('Введите первое число: ');
readln(x1);
write('Введите второе число: ');
readln(x2);
umn:=x1*x2;
writeln('Произведение чисел = ',umn);
end;
4:begin
write('Введите первое число: ');
readln(x1);
write('Введите второе число: ');
readln(x2);
celx1:=x1 div x2;
celx2:=x2 div x1;
writeln('Целая часть от деления x1 на x2 = ',celx1);
writeln('Целая часть от деления x2 на x1 = ',celx2);
end;
5:begin
write('Введите первое число: ');
readln(x1);
write('Введите второе число: ');
readln(x2);
ostx1:=x1 mod x2;
ostx2:=x2 mod x1;
writeln('Остаток от деления x1 на x2 = ',ostx1);
writeln('Остаток от деления x2 на x1 = ',ostx2);
end;
6:begin
write('Введите первое число: ');
readln(x1);
write('Введите второе число: ');
readln(x2);
korenx1:= sqrt(x1);
korenx2:= sqrt(x2);
writeln('Квадратный корень числа x1 = ',korenx1);
writeln('Квадратный корень числа x2 = ',korenx2);
end;
else
writeln;
write('Введен неизвестный номер операции');
end;
end.
Объяснение: