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

Составить программу в Pascal...
1.Площадь треугольника по 3-м его сторонам:
Var a,b,c, P: integer;
PP, S: real;
Begin
(дальше)

  1. Ответ
    Ответ дан 228Arkadiy228

    Площадь треугольника по 3-м его сторонам:

    Var a,b,c, P: integer;

    PP, S: real;

    Begin

    readln(a);

    readln(b);

    readln(c);

    PP := ( a + b + c ) / 2;

    S := sqrt(PP*(PP-a)*(PP-b)*(PP-c));

    writeln('Ответ(округлен до тысячных): ' + S:0:3);

    end.

Самые новые вопросы