Есть ответ 👍

Добрый вечер. , написать программу (на pascal) для решения квадратного уравнения.

106
158
Посмотреть ответы 2

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


Var a,b,c,d,x1,x2: real; begin read(a,b,c); d: =sqr(b)-4*a*c; if(d> 0)then begin x1: =(-b+sqrt(d))/(2*a); x2: =(-b-sqrt(d))/(2*a); writeln('x1=',x1: 3: 5,' x2=',x2: 3: 5); end else if(d=0)then begin x1: =-b/(2*a); writeln(x1: 5); end else writeln('нет корней. дискриминант меньше 0'); end.

Расчет средневзвешенной в программе эксель можно с специальной функции СУММПРОИЗВ, плюс к ней вы добавляете более привычную функцию СУММ.

Ваша задача записать данные функции следующими образом: =СУММПРОИЗВ(Х1;Х2)/СУММ(Х2), где:

Х1 - диапазон данных с показателем;

Х2 - вес данного показателя.

Объяснение:

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