Написать програму решения уравнения ах^3 + вх = 0 для произвольных а, в
5-9 класс
|
(Pascal.)
program ...;
var a,b,x1,x2,x3:real;
begin
writeln('Введите коэффициент a');
readln(a);
writeln('Введите коэффициен b');
readln(b);
x1:=0;
if (b>0) and (a>0) then writeln('Корни ур-я равны ',x1)
else
x2:=sqrt(-b/a);
x3:=-sqrt(-b/a);
writeln('Корни ур-я равны ',x1,x2,x3);
end.
var
a, 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.
Другие вопросы из категории
удваивается (вместо х появляется 2х). При нажатии на другую кнопку число увеличивается на 1 (вместо х появляется х+1). Как надо нажимать на кнопки, чтобы на экране появилось:99, 100
Читайте также
1.Даны два действительных числа меньшее из них замените полусуммой их, а большее их произведением.
2.Найдите решение уравнения ах+ в=0, если оно существует,если а=0
3.написать программу удвоения меньшего из двух чисел
Составить программу решения
линейного уравнения: ах + в = 0,
при (а <> 0)
2)
Посчитать, сколько молекул воздуха находится в данной комнате.
по поводу этой задачи от себя могу добавить (
молярная масса воздуха принимается равной 29 г/моль.
зная объем комнаты (параллелепипед высота*ширина*длина) находите объем в литрах. объем/22,4=количество в молях. полученный результат умножается на число авогадро и ответ готов (без учета давления и температуры)
надеюсь это поможет вам в составление программы и тем самым оказании услуги многим-многим школьникам, попавим в неловкое положение, в последние дни четверти.
напишіть програму обчислення добутків
a(a+1)(a+2)...(a+n+1)