Ответы на вопрос:
Var a,b,c: real; begin writeln('введите гипотенузу '); readln(a); writeln('введите катет '); readln(b); c: =sqrt(sqr(a)-sqr(b)); writeln('второй катет треугольника = ',c); end.
Популярно: Информатика
-
Написать программу (на pascalabc.net) файл содержащий сведения...
Анонимчик888828.12.2020 21:08 -
Ну вот, это последний...
Елена06072000702.04.2022 00:59 -
Дан массив в(20). заполните его случайными числами в интервале...
Cheburek111213.01.2022 09:23 -
Помлгите скажите подробно, куда надо нажать, чтобы вот эти строчки...
Ильяна11126.11.2020 17:17 -
Составьте программу которая найдет три последние цифры произведения...
sgsfgff27.07.2021 05:28 -
Какой флажок необходимо перевести во включённое положение (поставить...
dashechka170723.06.2023 09:21 -
За 3 години майстер виготовляє 24 деталі скільки часу йому потрібно...
vomid542127.03.2020 16:51 -
Одна из состоит в том, чтобы 1) обеспечить максимальную добычу...
Помогу11111115694616.05.2022 07:58 -
Укупены лекарственной цветки правильные обоеполые. околоцветник...
Ogeg22.11.2022 20:58 -
8класс 1)2(х² +х-3)=5х²-6 2)(х+2)²+(х-2)²=3х²-9 3)6х²+9х -1=(2х+1)(2х-1)...
vitaliy55555504.02.2023 19:27