Лучшие помощники
- Megamozg 2205 б
- Matalya1 1800 б
- DevAdmin 1720 б
- arkasha_bortnikov 900 б
- Dwayne_Johnson 865 б
27 декабря 2022 03:37
623
Напишите программу которая вычисляет дискрименант квадратного уравнения (в паскале)
2
ответа
У тебя написано только дискриминант. Я написал, но мне кажется тебе нужны были корни
Var a,b,c,d:integer;
begin
read(a,b,c);
d:=b*b-4*a*c;
writeln(d);
end.
Var a,b,c,d:integer;
begin
read(a,b,c);
d:=b*b-4*a*c;
writeln(d);
end.
0
·
Хороший ответ
29 декабря 2022 03:37
Var a,b,c,d:integer;
begin
writeln('Введите коэффициенты a, b, c:');
readln(a,b,c);
d:=b*b-4*a*c;
writeln('D = ',d);
end.
Пример:
Введите коэффициенты a, b, c:
5 2 8
D = -156
begin
writeln('Введите коэффициенты a, b, c:');
readln(a,b,c);
d:=b*b-4*a*c;
writeln('D = ',d);
end.
Пример:
Введите коэффициенты a, b, c:
5 2 8
D = -156
0
29 декабря 2022 03:37
Остались вопросы?
Еще вопросы по категории Информатика
Пж ПОМОГИТЕ 1 ВОПРОС Что входит в состав прикладного программного обеспечения?...
Сообщение о том,что ваш друг живет на 10 этаже,несёт 4 бита информации.Сколько этажей в доме?...
Выполните вычитание двоичных чисел a)1011-101,11 b)1101,101-1001,01...
1. Телекоммуникация – это… а) общение между людьми через телевизионные мосты; б) общение между людьми через телефонную сеть; в) обмен информацией на...
Вася шифрует русские слова, записывая вместо каждой буквы её код.: А(01) В(011) Д(100) О(111) Р(010) У(001) Некоторые цепочки можно расшифровать...