Нахождение периметра и площади прямоугольного треугольника Pascal(Паскаль)

Нужно составить программу для нахождения периметра и площади треугольника.Вводимые данные: a,b — стороны прямоугольного треугольника,c — гипотенуза треугольника.(P=a+b+c; S(1 под чертой 2)a,b)

program plosh;
var
    a,b,c: real;
begin
    writeln('Введите сторону a');
    readln(a);
    writeln('Введите сторону b');
    readln(b);
    writeln('Введите сторону c');
    readln(c);
    writeln('S=',(a*b)/2:0:2);
    writeln('P=',(a+b+c):0:2);
end.

Похожие записи/страницы:

Leave a Comment

85 − = 81