Даны три длины сторон треугольник. Найти медианы треугольника, сторонами которого являются медианы исходного треугольника

@sncho · Регистрация: 23.10.2013

Author24 — интернет-сервис помощи студентам

Даны три длины a,b,c сторон некторого треугольник. Найти медианы треугольника, сторонами которого являются медианы исходного треугольника.

M(a)=1/2*sqrt(2*b^2+2*c^2-a^2)

Не понял условия задачи

Pascal

uses crt;
var a,b,c:integer; ma,mb,mc:real;
procedure med(a,b,c:integer);
var ma,mb,mc:real;
begin
ma:=sqrt(2*sqr(b)+2*sqr(c)-sqr(a))/2;
mb:=sqrt(2*sqr(a)+2*sqr(c)-sqr(b))/2;
mc:=sqrt(2*sqr(b)+2*sqr(a)-sqr(c))/2;
end;
begin
     write('a,b,c');
     read(a,b,c);
     med(a,b,c);
     writeln('ma=',ma,'mb=',mb,'mc=',mc);
end.

этот не пашет

Добавлено через 49 минут
Формула медианы

Добавлено через 35 секунд
$https://www.cyberforum.ru/cgi-bin/latex.cgi?m\left(a \right)=1/2sqrt(2{b}^{2}+2{c}^{2}-{a}^{2})$

@sncho · 28.10.2013, 17:01 **[ТС]**

Помогите

Добавлено через 34 секунды
HELP

@sncho · 28.10.2013, 17:05 **[ТС]**

Даны три длины a,b,c сторон некторого треугольник. Найти медианы треугольника, сторонами которого являются медианы исходного треугольника.

M(a)=1/2*sqrt(2*b^2+2*c^2-a^2)

Не понял условия задачи

Pascal

uses crt;
var a,b,c:integer; ma,mb,mc:real;
procedure med(a,b,c:integer);
var ma,mb,mc:real;
begin
ma:=sqrt(2*sqr(b)+2*sqr(c)-sqr(a))/2;
mb:=sqrt(2*sqr(a)+2*sqr(c)-sqr(b))/2;
mc:=sqrt(2*sqr(b)+2*sqr(a)-sqr(c))/2;
end;
begin
     write('a,b,c');
     read(a,b,c);
     med(a,b,c);
     writeln('ma=',ma,'mb=',mb,'mc=',mc);
end.

этот не пашет
Формула медианы:
$https://www.cyberforum.ru/cgi-bin/latex.cgi?m(a)=1/2sqrt(2b^2+2c^2-a^2)$

@L_e_g_i_o_n · 28.10.2013, 17:55

Pascal

uses crt;
var a,b,c:real;
var ma,mb,mc:real;
procedure med(a,b,c:real;var ma,mb,mc:real);
begin
ma:=sqrt(2*sqr(b)+2*sqr(c)-sqr(a))/2;
mb:=sqrt(2*sqr(a)+2*sqr(c)-sqr(b))/2;
mc:=sqrt(2*sqr(b)+2*sqr(a)-sqr(c))/2;
end;
begin
repeat
  write('a,b,c: ');
   readln(a,b,c);
    if (a>=b+c)or(b>=a+c)or(c>=a+b) then writeln('Ýòî íå ñòîðîíû òðåóãîëüíèêà')
until (a<b+c)and(b<a+c)and(c<a+b);
 
     med(a,b,c,ma,mb,mc);
     med(ma,mb,mc,ma,mb,mc);
     writeln('m1= ',ma);
     writeln('m2= ',mb);
     writeln('m3= ',mc);
end.

@wastedg · 29.10.2013, 17:54

Найти медианы треугольника, сторонами которого являются медианы исходного треугольника

Даны три длины сторон треугольник. Найти медианы треугольника, сторонами которого являются медианы исходного треугольника

Решение

Решение

@sncho 0 / 0 / 0 Регистрация: 23.10.2013 Сообщений: 3
	28.10.2013, 17:01 [ТС]	2
	Помогите Добавлено через 34 секунды HELP 0

@wastedg 1 / 1 / 1 Регистрация: 01.10.2013 Сообщений: 17
	29.10.2013, 17:54	5
	Сообщение было отмечено Памирыч как решение Решение Найти медианы треугольника, сторонами которого являются медианы исходного треугольника 0

Опции темы