Var Ma,a,b,c : real;
Begin
a := 7;
b := 4;
c := 5;
Ma := 1/2*sqrt(2*sqr(b)+2*sqr(c)-sqr(a));
WriteLn(Ma:2:3);
End.
HELP
Народ, очень сильно прошу...помогите зделать прогаму на задачу...надо решить на процедуре.
очень прошу! вот кстати задача...Найти медину триугольника, если известно стороны---M=1/2*sqrt(2*sqr(b)+2*sqr(c)-sqr ( a ))
Очень , очень прошу...напишите ктото как ето делаетса.
....зарание спосибо.:(
очень прошу! вот кстати задача...Найти медину триугольника, если известно стороны---M=1/2*sqrt(2*sqr(b)+2*sqr(c)-sqr ( a ))
Очень , очень прошу...напишите ктото как ето делаетса.
....зарание спосибо.:(
большое спосибо, но ето разве на подпрограме Процедера?