profile
Опубликовано 5 лет назад по предмету Информатика от Sashatarabaeva19

Вычислите длины медианы треугольника, заданного длинами сторон.

  1. Ответ
    Ответ дан syber2013
    program mediana;
    uses crt;var a,b,c:integer;
                m:real;
    begin 
    clrscr; 
    write('Input 1 side:'); 
    readln(a);
    write('Input 2 side:'); 
    readln(b); 
    write('Input 3 side:'); 
    readln(c); 
    m:=1/2*sqrt(2*sqr(a)+2*sqr(b)-sqr(c)); 
    writeln('Mediana= ',m:2:2); 
    write('Press any key...'); 
    repeat until 
    keypressed;
    end.