Вычислить площадь прямоугольника, если заданы его диагональ d b сторона a. (Информа?
Вычислить площадь прямоугольника, если заданы его диагональ d b сторона a. (Информа??ика!)
Гость
Ответ(ы) на вопрос:
Гость Var a,d,b,s:real;
begin
write('a = '); readln(a);
write('d = '); readln(d);
b:=sqrt(d*d-a*a);
s:=a*b;
writeln('S = ',s);
end.
Пример:
a = 4
d = 5
S = 12
Не нашли ответ?
Похожие вопросы