найти площадь равнобедренного треугольника по длине основания и высоте, проведённой к нему Pascal
Ответы
Ответ дал:
0
program AreaOfIsoscelesTriangle;
var
base, height, area: real;
begin
// Ввод длины основания
write('Введите длину основания треугольника: ');
readln(base);
// Ввод высоты треугольника
write('Введите высоту треугольника, проведенную к основанию: ');
readln(height);
// Вычисление площади треугольника
area := 0.5 * base * height;
// Вывод результата
writeln('Площадь треугольника: ', area);
// Ожидание ввода перед закрытием консоли
readln;
end.
Вас заинтересует
2 месяца назад
2 месяца назад
2 месяца назад
1 год назад
7 лет назад