Регистрация
ErnurNick
23.05.2023 19:30
Информатика
Есть ответ 👍

Вpascal создать программу о дискриминанте и с !

259
410
Посмотреть ответы 2

Ответы на вопрос:

siyashka1
siyashka1
4,4(41 оценок)
Program q3; var: a,b,c,d,x1,x2: real; (вводим переменные) readln(a); readln(b); readln(c); (считываем переменные с клавиатуры) d: =b*b-4*a*c; (формула дискриминанта) if(d< 0) then writeln('нет решений'); (проверяем дикриминант меньше 0) if(d=0) then do begin x1: =-b/2*a; writeln(x1); end; if(d> 0) then do begin x1: =(-b+sqrt(d))/2*a; x2: =(-b-sqrt(d))/2*a; (находим корни) writeln(x1); writeln(x2); end; end.
Dfh32
Dfh32
4,8(53 оценок)
Среднее арифметическое? все просто- складываете числа и делите количество сумм. например: врач-50 евро, медсестра-40. получится 50+40 и поделить на 2 так как двое чисел, получится 45, это и есть среднее.

Популярно: Информатика