Определить значение площади прямоугольника по его длине и диагонали в Паскале

Question

Информатика

Лейла

8 мая, 16:41

Определить значение площади прямоугольника по его длине и диагонали в Паскале

+5

Ответы (1)

Знаете ответ?

Миланка · Answer 1

Program p;

var

a, b, c, s: integer;

begin

writeln ('введите длину:') ;

readln (a) ;

writeln ('введите диагональ:') ;

readln (c) ;

b : = sqrt ((sqr (c) - sqr (a))) ;

s : = a * b;

writeln ('площадь прямоугольника: ', s) ;

end.