program ii; var A, B, C, D: real; begin writeln ('Введите коэффициенты А, В, С'); readln (A, B, C); if A=0 then writeln ('Уравнение не квадратное') else begin D := B*B - 4*A*C; A := 2*A; if D<0 then writeln ('Действительных корней нет') else if D=0 then writeln ('Корни равны: X1 = X2 = ', -B/A) else begin D := sqrt(D); writeln ('X1 = ', (-B+D)/A);writeln ('X2 = ', (-B-D)/A); end; end; end.
mrubleva42
24.01.2023
Class OftenChar{ public static void main(String args[]){ java.util.Scanner in = new java.util.Scanner(System.in); String string = in.nextLine(); char chars[] = new char[4]; chars[0] = in.nextLine().charAt(0); chars[2] = in.nextLine().charAt(0); for(int sChar = 0; sChar<string.length(); sChar++) if(string.charAt(sChar)==chars[0])chars[1]++; else if(string.charAt(sChar)==chars[2])chars[3]++; System.out.print("\n"+(chars[1]==chars[3]?chars[0]+""+chars[2]:chars[1]>chars[3]?chars[0]:chars[2])); } }
иванович Диденко1524
24.01.2023
Чтобы прекратить ввод чисел в массив нужно ввести число "-1". class ArrayMiddle{ public static void main(String args[]){ java.util.Scanner in = new java.util.Scanner(System.in); long eArray[] = new long[1]; while((eArray[eArray.length-1] = in.nextLong())!=-1){ long nArray[] = new long[eArray.length+1]; for(int nCell = 0; nCell<eArray.length; nCell++)nArray[nCell]=eArray[nCell]; eArray = nArray; } eArray[eArray.length-1] = 0; for(int cCell = 0; cCell<eArray.length-1; cCell++)eArray[eArray.length-1]+=eArray[cCell]; System.out.print(eArray[eArray.length-1]/(double)(eArray.length-1)); } }
Ответить на вопрос
Поделитесь своими знаниями, ответьте на вопрос:
Составить программу решения ах2+вх+с=0, а, в не равно нулю.проверить случай , когда дискриминант болmше нуля меньше нуля и равен нулю.
var A, B, C, D: real;
begin
writeln ('Введите коэффициенты А, В, С');
readln (A, B, C);
if A=0 then
writeln ('Уравнение не квадратное')
else
begin
D := B*B - 4*A*C;
A := 2*A;
if D<0 then
writeln ('Действительных корней нет')
else
if D=0 then
writeln ('Корни равны: X1 = X2 = ', -B/A)
else
begin
D := sqrt(D);
writeln ('X1 = ', (-B+D)/A);writeln ('X2 = ', (-B-D)/A);
end; end; end.