Регистрация
galinaluchwaya666
03.10.2021 01:26
Информатика
Есть ответ 👍

Составьте БЛОК СХЕМУ Составьте программу нахождения среднего арифметического значения

одномерного массива А(N) (элементы массива вводятся с клавиатуры).

Сформируйте новый массив В(М), состоящий из элементов массива А(N),

больших среднего арифметического.

101
134
Посмотреть ответы 1

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

roldugina78
roldugina78
4,6(3 оценок)
Var a,b,c,s,p,p1,rb,ro: real ; begin    readln(a);   readln(b);   readln(c);   p1: =a+b+c;   p: =p1/2;   s: =sqrt(p1*(p1-a)*(p1-b)*(p1-c));   rb: =s/p;   ro: =(a*b*c)/(4*s);   writeln('радиус вписаной ',rb,' радиус описанной ',ro); end.

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