Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
amir3009
14.02.2021 06:25 •
Другие предметы
Пусть элементами прямоугольного равнобедренного треугольника являются: 1) катет а; 2) гипотенуза b; 3) высота, опущенная из вершины
Показать ответ
Ответ:
Locko3
16.04.2019 23:00
USES Crt;
VAR
x: byte;
xx: REAL;
BEGIN
READ(x, xx);
CASE x OF
1: BEGIN
WRITELN('b=', xx*sqrt(2):0:4);
WRITELN('h=', xx/sqrt(2):0:4);
WRITELN('S=', sqr(xx)/2:0:4);
END;
2: BEGIN
WRITELN('a=', xx/sqrt(2):0:4);
WRITELN('h=', xx/2:0:4);
WRITELN('S=', sqr(xx)/4:0:4);
END;
3: BEGIN
WRITELN('a=', xx*sqrt(2):0:4);
WRITELN('b=', xx*2:0:4);
WRITELN('S=', xx:0:4);
END;
4: BEGIN
WRITELN('a=', sqrt(xx*2):0:4);
WRITELN('b=', 2*sqrt(xx):0:4);
WRITELN('h=', sqrt(xx)/2:0:4);
END;
END;
READLN;
READLN
END.
0,0
(0 оценок)
Популярные вопросы: Другие предметы
катя7354
22.04.2020 19:24
Есе к епіграфу : громадянське суспільство-- суспільство створивши яке, громадянин усвідомлює, що він має служити державі, а держава--йому...
dodess
24.09.2021 10:13
Проанализируйте состояние промышленности БАССР в начале 20-х гг. Объясните причины ее упадка...
klepekhin
04.09.2022 07:45
Скласти Синкан до ліричного героя із сонети Щоб мучить мене...
NaStYтуут
05.08.2021 12:21
, Рис. 113. Задания для упражнений перенесите на кальку чертеж и дополните его недостающимилиниями....
gudroonnp010ou
16.06.2021 09:05
Отличалась ли судьба Юрия Гагарина от судеб других юношей его поколения? Какую роль сыграли родители Гагарина в его становлении? Чем он увлекался? Как относился к знаниям?...
dianahohlova
24.11.2020 13:22
5-тапсырма. «Менің алған әсерім» кестесін толтыр. 1) қандай жаңа ой пайда не сезіндім? 2) не ұнады? 3) болды?...
Ekaeterina44
20.07.2022 00:27
1. Определите причины Великих географических открытий 1.Экономические причины 2.Научно- технические причины 3.Религиозные причины 4.Политические 1._ 2._3._4._...
sha14558538
10.07.2022 17:40
* Найдите в газетах, журналах, энциклопедиях сведения о том, как люди на- ходят решение экологических проблем. Подумайте, как эти сведения офор- мить, и представьте классу...
AlinkaMakovka
12.02.2022 19:56
По какому календарю ведётся иудейское летоисчисление: Выберите один ответ: a. по лунному и солнечному одновременно b. по юлианскому c. по григорианскому d. всё перечисленное...
sergeevan73
22.06.2021 05:34
смысл пословицы: спокойствие соседа мир в твоём доме ....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
VAR
x: byte;
xx: REAL;
BEGIN
READ(x, xx);
CASE x OF
1: BEGIN
WRITELN('b=', xx*sqrt(2):0:4);
WRITELN('h=', xx/sqrt(2):0:4);
WRITELN('S=', sqr(xx)/2:0:4);
END;
2: BEGIN
WRITELN('a=', xx/sqrt(2):0:4);
WRITELN('h=', xx/2:0:4);
WRITELN('S=', sqr(xx)/4:0:4);
END;
3: BEGIN
WRITELN('a=', xx*sqrt(2):0:4);
WRITELN('b=', xx*2:0:4);
WRITELN('S=', xx:0:4);
END;
4: BEGIN
WRITELN('a=', sqrt(xx*2):0:4);
WRITELN('b=', 2*sqrt(xx):0:4);
WRITELN('h=', sqrt(xx)/2:0:4);
END;
END;
READLN;
READLN
END.