Составьте блок-схему и программу
10-11 класс
|
на языке Pascal для вычисления длин высот треугольника, у которого длины
сторон a, b, c (a, b,
var a, b, c, S, p, Ha, Hb, Hc: Real;
begin
readln(a, b, c);
if ((a = 0) or (b = 0) or (c = 0)) then
writeln('Error')
else
begin
p := (a + b + c) / 2;
S := Sqrt(p*(p-a)*(p-b)*(p-c));
Ha := 2 * S / a;
Hb := 2 * S / b;
Hc := 2 * S / c;
writeln('Ha = ', Ha : 4 : 5);
writeln('Hb = ', Hb : 4 : 5);
writeln('Hc = ', Hc : 4 : 5);
end;
end.
---
Фух... Удачи:)
всё зависит какую высоту ты хочешь вычислять и какой треугольник будет вообще
треугольник разносторонний
Другие вопросы из категории
а) в сроке состояния текстового редактора;
в)в меню текстового редактора;
с)в окне текстового редактора;
д)на панели задач;
минимальное основание имеет система, если в ней записаны числа 124, 354, 4215
Читайте также
2. Составьте программу, определяющую, является ли данное число делителем числа 3.
3*. Составьте программу, заменяющую из двух данных чисел меньшее число суммой, а большее – произведением этих чисел.
Я не могу сочинить этот "алгоритм", помогите ;)
Блок-схемы строить не надо, просто описать, что надо делать.
2)построить блок схему которая меняет порядок цифр числа на обратный. например было 12345,стало 54321.
Задание: проверить истинность высказывания: "Все цифры данного трехзначного числа различны"
Программа должна выводить либо True либо False. (с помощью типа: boolean)
Зараннее спасибо!