Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 870 б
10 декабря 2022 23:38
430
Выдаёт ошибку (Встречено 'else', а ожидался оператор)Что делать??
Program R ;
var a,b,c,x,D,x1,x2:real ;
begin
readln (a,b,c) ;
D:= a*(x*x)+b*x+c ;
if D>0 then x1:= (-b+sqrtD)/(2*a) ;
x2:= (-b-sqrtD)/(2*a) ;
else ('Корней нет') ;
if D=0 then x:= (-b+sqrtD)/(2*a) ;
writeln ('x1=;x1) ;
writeln ('x2=;x2) ;
end.
1
ответ
1. Исправьте условие
if D>0 then x1:= (-b+sqrtD)/(2*a) ;
x2:= (-b-sqrtD)/(2*a) ;
else ('Корней нет') ;
на
if D>0 then begin
x1:= (-b+sqrt(D))/(2*a);
x2:= (-b-sqrt(D))/(2*a);
end
else writeln ('Корней нет') ;
и здесь:
if D=0 then x:= (-b+sqrtD)/(2*a) ;
writeln ('x1=;x1) ;
writeln ('x2=;x2) ;
на
if D=0 then begin
x:= (-b+sqrt(D))/(2*a) ;
writeln('x = ', x);
end;
writeln ('x1=',x1) ;
writeln ('x2=',x2) ;
if D>0 then x1:= (-b+sqrtD)/(2*a) ;
x2:= (-b-sqrtD)/(2*a) ;
else ('Корней нет') ;
на
if D>0 then begin
x1:= (-b+sqrt(D))/(2*a);
x2:= (-b-sqrt(D))/(2*a);
end
else writeln ('Корней нет') ;
и здесь:
if D=0 then x:= (-b+sqrtD)/(2*a) ;
writeln ('x1=;x1) ;
writeln ('x2=;x2) ;
на
if D=0 then begin
x:= (-b+sqrt(D))/(2*a) ;
writeln('x = ', x);
end;
writeln ('x1=',x1) ;
writeln ('x2=',x2) ;
0
·
Хороший ответ
12 декабря 2022 23:38
Остались вопросы?
Еще вопросы по категории Информатика
Шахматная ладья ходит по горизонтали или вертикали. Даны две различные клетки шахматной доски, определите, может ли ладья попасть с первой клетки на в...
У исполнителя Счетчик две команды, которым присвоены номера: вычти три умножь на два Первая команда уменьшает число на экране на 3, вторая - удва...
Для записи сообщения использовался 64-х символьный алфавит.каждая страница содержит 30 строк.все сообщение содержит 8775 байтов информации и занимает...
Как посчитать среднее значение в таком формате 100,00 грн? У меня выдаёт ошибку. Нужно найти среднее значение с ячеек по этой формуле =СРЗНАЧ(B5:B10)...
. Что является результатом выполнения оператора? а) write (a) б) write ('a') в) write ('a=', a)...