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

 Составьте блок-схему и программу
на языке Pascal для вычисления длин высот треугольника, у которого длины
сторон a, b, c (a, b, 
c вводятся с клавиатуры).

  1. Ответ
    Ответ дан HRAshton
    var a, b, c, S, p, Ha, Hb, Hc: Real;
    begin
         readln(a, b, c);
         if ((a = 0) or (b = 0) or (c = 0)) then
            writeln('Error')
         else
             begin
                  p := (a + b + c) / 2;
                  S := Sqrt(p*(p-a)*(p-b)*(p-c));
                  Ha := 2 * S / a;
                  Hb := 2 * S / b;
                  Hc := 2 * S / c;
                  writeln('Ha = ', Ha : 4 : 5);
                  writeln('Hb = ', Hb : 4 : 5);
                  writeln('Hc = ', Hc : 4 : 5);
             end;
    end.
    ---
    Фух... Удачи:)
Самые новые вопросы