Помогите написать программу (4) в Turbo Pascal

Question

Составить блок-схему алгоритма и программу для решения задачи. 
Задан прямоугольный треугольник со сторонами a, b, c. Вычислить его периметр P и площадь S. 
 
Напишите от BEGIN и до END., пожалуйста.

Никита Бледных · Accepted Answer

write('ведите стороны a,b,c'); 
readln(a,b,c); 
p=:a+b+c; 
s:=a*b/2; 
write('P=',p,' S=',s);