Лучшие помощники
- Megamozg 2170 б
- Matalya1 1800 б
- DevAdmin 1685 б
- arkasha_bortnikov 775 б
- Dwayne_Johnson 755 б
27 декабря 2022 03:37
492
Напишите программу которая вычисляет дискрименант квадратного уравнения (в паскале)
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
Остались вопросы?
Еще вопросы по категории Информатика
ниже в табличной форме представлен фрагмент базы данных о результатах тестирования учащихся (используется 100 бальная шкала) (смотри вложение) сколько...
История структурное программирование...
ОЗУ - это память, в которой... 1. Хранится исполняемая в данный момент времени программа и данные, с которыми она непосредственно работает; 2. Хранитс...
Угадайте правило шифрования и запишите верные слова 1) АКИТАМРОФНИ 2) ХИНЕНАРЕ 3) ЕИНАВОРИДОК 4) АКТОБАРБО...
дачники летом собрали а кг малины а смородины на н кг больше сколько всего кг ягод собрали дачники...