Регистрация
вадимм2
21.10.2022 22:00
Информатика
Есть ответ 👍

Написать програму решения уравнения ах^3 + вх = 0 для произвольных а, в

197
405
Посмотреть ответы 3

Ответы на вопрос:

тууутуууу
тууутуууу
4,4(59 оценок)

vara, b, x2, x3 : real; begin writeln('введите коэффициент a'); readln (a); writeln('введите коэффициен b'); readln (b); if b = 0 then begin if a = 0 then writeln ('x - любое число') else writeln('корни ур-я равны: 0') end else if (a = 0) or (- b / a < = 0) then writeln ('корни ур-я равны: 0') else begin x2 : = sqrt(-b / a); x3 : = -sqrt(-b / a); writeln('корни ур-я равны 0, ', x2,' ',x3); end; readln; end.

sveta465
sveta465
4,5(48 оценок)

(pascal.)

program ; var a,b,x1,x2,x3: real; beginwriteln('введите коэффициент a'); readln(a); writeln('введите коэффициен b'); readln(b);

x1: =0;

if (b> 0) and (a> 0) then writeln('корни ур-я равны ',x1)  elsex2: =sqrt(-b/a); x3: =-sqrt(-b/a); writeln('корни ур-я равны ',x1,x2,x3);

end.

zulfiya22
zulfiya22
4,7(6 оценок)

ответ:0001 - А

0010 - В

0011 - Д

0100 - Е

0101 - Ж

0110 - И

0111 - К

1000 - Л

1001 - М

1010 - Н

1011 - О

1100 - П

1101 - Р

1110 - Ь

1111 - Ш

Объяснение: не точно

Популярно: Информатика