Номер 5, страница 129 - гдз по информатике 11 класс учебник Босова, Босова

Глава 2. Алгоритмы и элементы программирования. Параграф 9. Структурное программирование - номер 5, страница 129.

Условие.

5. Дан прямоугольный параллелепипед, длины рёбер которого равны а, b и с. Требуется определить периметр треугольника, образованного диагоналями его граней. Какой алгоритм целесообразно использовать при решении этой задачи в качестве вспомогательного?

Решение.

В качестве вспомогательного алгоритма будет выступать нахождение длины диагонали прямоугольника:

function h(l1, l2: real): real;
begin h:=sqrt(sqr(l1)+sqr(l2))
end;
Программа:
function h(l1, l2: real): real;
begin h:=sqrt(sqr(l1)+sqr(l2))
end;
var a, b, c, p: real;
begin
writeln('Введите значения a, b, c');
read(a, b, c);
p:=0;
p:=p+h(a, b);
p:=p+h(b, c);
p:=p+h(c, a);
writeln('Периметр сечения = ', p:4:2)
end.