ТЕКСТ ЗАДАНИЯ Расшифруйте слово цЖГЪГ закодированное с Шифра Цезаря. Известно, что каждая буква исходного - id1437147620210614 от tgeibdizn 14.06.2021 12:04

Question

Информатика: ТЕКСТ ЗАДАНИЯ Расшифруйте слово цЖГЪГ закодированное с Шифра Цезаря. Известно, что каждая буква исходного текста заменяется третьей после нее буквой в алфавите. А Б В ГА Е Ё Ж З И й клин о прст у ф х ц ч ш щ ъ ы ь Э Ю Я КРАЖА УДАЧА BECHA​

tgeibdizn · Accepted Answer

Прежде всего - формулы. Пусть а - длина стороны, тогда
$\displaystyle r= \frac{ \sqrt{3}}{6}a; \ R=2r; \ h=3r; \ S= \frac{1}{2}ah$

var
a, r, rr, h, s: real;

begin
Write('Введите длину стороны треугольника: ');Readln(a);
r := sqrt(3) * a / 6;
rr := 2 * r;
h := 3 * r;
s := a * h / 2;
Writeln('Радиус вписанной окружности ', r);
Writeln('Радиус описанной окружности ', rr);
Writeln('Высота треугольника ', h);
Writeln('Площадь треугольника ', s);
end.

Тестовое решение:
Введите длину стороны треугольника: 10
Радиус вписанной окружности 2.88675134594813
Радиус описанной окружности 5.77350269189626
Высота треугольника 8.66025403784439
Площадь треугольника 43.3012701892219

MOGZ ответил