сервис вопросов и ответовCоставить программу для решения квадратного уравнения ax^2+bx+c=0
5-9 класс|
|
12032011
28 окт. 2014 г., 14:27:55 (9 лет назад)
айгульчик2000
28 окт. 2014 г., 15:07:02 (9 лет назад)
var a,b,c,d:real;
begin
readln(a,b,c);
d:=sqr(b)-4*a*c;
if d<0 then writeln('Net kornei');
if d=0 then writeln('x=',-b/(2*a));
if d>0 then writeln('x1=', (-b-sqrt(d))/(2*a),' x2=',(-b+sqrt(d))/(2*a));
end.
BarrySad
28 окт. 2014 г., 16:42:26 (9 лет назад)
Var a,b,c,D,x1,x2,p,q:Real; Begin Repeat Write('a= '); Readln(a); if a=0 then writeln('Error: a=0. Enter another value'); Until a<>0; Write('b= '); Readln(b); Write('c= '); Readln(c); p:=b/a; q:=c/a; D:=Sqr(p/2)-q; If D>0 then begin Writeln('x1 = ',-p/2-Sqrt(D):0:5); Writeln('x2 = ',-p/2+Sqrt(D):0:5); end else If D=0 then Writeln('x1 = x2 = ',-p/2:0:5) else begin Writeln('x1 = ',-p/2:0:5,'-i*',Sqrt(-D):0:5); Writeln('x2 = ',-p/2:0:5,'+i*',Sqrt(-D):0:5); end; Readln; End.
Ответить
Другие вопросы из категории
а) “наличия аттестата о среднем образовании достаточно для поступления в институт”;
б) “наличие аттестата о среднем образовании необходимо для поступления в институт”;
в) “если целое число делится на 6, то оно делится на 3”;
г) “подобие треугольников является необходимым условием их равенства”;
д) “подобие треугольников является необходимым и достаточным условием их
равенства”;
е) “треугольники подобны только в случае их равенства”;
ж) “треугольники равны только в случае их подобия”;
з) “равенство треугольников является достаточным условием их подобия”;
и) “для того, чтобы треугольники были неравны, достаточно, чтобы они были
неподобны”;
к) “для того, чтобы четырёхугольник был квадратом, достаточно, чтобы его диагонали
были равны и перпендикулярны”.
Читайте также
Составьте программу на языке Паскаль для решения квадратного уравнения.Коэффициенты a,b и c вводятся с клавиатуры.На экране выводится информация о
значении корней квадратного уравнения.
1) Сколько данных необходимо ввести для вычисления площади квадрата? 2) Определите результат работы программы : writeln ('15+15=',15+15).
3) Какая фигура в блок-схеме предназначена для выводы данных?
4) Определите результат работы программы : a:=-6 b:=-5 a:=a-2*b;b"=a
5) Скольких команд ввода исходных данных достаточно для решения квадратного уравнения?
Вы находитесь на странице вопроса "Cоставить программу для решения квадратного уравнения ax^2+bx+c=0", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.