Написать программу для вычисления периметра прямоугольного треугольника по двум...

Question

Написать программу для вычисления периметра прямоугольного треугольника по двум катетам.По программе Паскаль.Помогите пж.

Answer 1

S=a*b
P=(a+b)*2
это или нет

Comments

не,не то.Все равно спасибо

---

А что?

---

program qw;
var a,b,h,s:real;
begin;
writeln('Введите длину оснований и высоту: ');
read(a,b,h);
s:=(a+b)*h/2;
write('Площадь трапеции равна ', s);
end.

---

что то типо этого

---

но это трапеция

---

пончтнл

---

понятно

---

Program sq;
var a, b, p, s, s2 : real;
begin
Writeln('введите первый катет');
Read(a);
Writeln('введите второй катет');
Read(b);
s:=(a*b)/2;
Writeln('площадь -', s);
s2:=sqrt(sqr(a)+sqr(b));
p:=a+b+s2;
Writeln('периметр -', p);
end.