Найти перемитр треугольника и вывести его на экран р = (а+в) перемитр прямоуг. со сторонами а и в

Question

Информатика

Лукинична

14 января, 16:07

Найти перемитр треугольника и вывести его на экран р = (а+в) перемитр прямоуг. со сторонами а и в

+3

Ответы (1)

Знаете ответ на вопрос?

Борислав · Answer 1

Var a, b, p:integer;

begin

writeln ('введите стороны треугольника') ;

readln (a, b) ;

p: = (a+b) ; {но тут с формулой не так, мб 2 * (a+b?}

writeln ('P = ', p) ;

end;