Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Х
Химия
Д
Другие предметы
Н
Немецкий язык
Б
Беларуская мова
М
Музыка
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
У
Українська література
Р
Русский язык
Ф
Французский язык
П
Психология
О
Обществознание
А
Алгебра
М
МХК
Г
География
И
Информатика
П
Право
А
Английский язык
Г
Геометрия
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
magnoliya220619
23.04.2022 00:31 •
Информатика
По двум данным катетам составьте програму вичесления гипотенузы и плошади прямугольного треугольника
Показать ответ
Ответ:
zokaa112
06.10.2020 05:32
Var
a, b, c, S: real;
begin
write('Введите длину 1 катета: ');
readln(a);
write('Введите длину 2 катета: ');
readln(b);
c := Sqrt(Sqr(a) + Sqr(b));
S := 0.5 * a * b;
writeln('Гипотенуза треугольника = ', c);
writeln('Площадь треугольника = ', S);
readln;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
09nika90
11.10.2021 13:40
Свойства логических операций. 1) Найдите значения логического выражения: ((10)&(1&1))&(01) 2) Даны простые высказывания: А = {5 3}, В = {2=3} иС =...
ieoeoeoeosikskd
21.05.2022 09:22
Расположи величины в порядке убывания (сверху - вниз): Расположите элементы в правильном порядке:2 Мбайт1024 Кбайт3072 байта20 битов2 байтаОчень 30 б...
Tasha00000007
04.03.2021 08:48
Составить кроссворд по теме Жесткие диски (HDD) . В кроссворде должно быть 13 слов решить. Желательно с объяснением....
Vollver
09.01.2021 06:08
2 варіант 1. Що з перерахованого є фізичною величиною? ( ) а) Пластмаса б) Телефон в) Повінь г) Довжина 2. Яке з наведених слів позначає одиницю фізичної величини? ( )...
vladEfimenko1
14.05.2020 06:40
Русский язык помагите...
знания209д
17.06.2022 11:53
74. Қатынастардан пропорция құрындар...
Викa2003648219
27.10.2021 13:57
А) 56+(2х- 4)=120 в) 5х - 83 = 982 Решите уравнения , у меня формативка!...
kashasha
25.02.2023 19:58
Задание 4 ( ). Андрей забыл первую цифру своего пятизначного пароля от телефона *5825, но он помнит, что всё число делится на 3. Сколько вариантов кода ему нужно перебрать,...
ana0stacy
29.09.2022 02:56
Задание 1 ( ). Найдите все натуральные числа n, кратные 5, при которых будет верным неравенство: 175 n 150. Обоснуйте своё решение, используя признак делимости. Задание...
opd23
17.12.2020 14:05
(нужно с решением) номер 6...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a, b, c, S: real;
begin
write('Введите длину 1 катета: ');
readln(a);
write('Введите длину 2 катета: ');
readln(b);
c := Sqrt(Sqr(a) + Sqr(b));
S := 0.5 * a * b;
writeln('Гипотенуза треугольника = ', c);
writeln('Площадь треугольника = ', S);
readln;
end.