Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
vasyazabelin
09.04.2021 09:56 •
Информатика
Даны длины сторон треугольника a, b, c. найти площадь треугольника s. использовать формулу герона. входные данные: числа a, b, c. выходные данные: площадь треугольника с точностью до 3 цифр в дробной части
Показать ответ
Ответ:
SchoolPro1453
10.09.2020 17:16
PascalABC.NET 3.4.0, сборка 1671 от 31.05.2018
Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=ReadReal3('Введите a.b.c:');
var p:=(a+b+c)/2;
Writeln('S=',Sqrt(p*(p-a)*(p-b)*(p-c)):0:3)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
YourMango
10.11.2021 00:36
Как называется объект, который передаёт информацию. 8 букв. Четвертая о....
nikita57551
04.07.2020 08:16
Що таке макет зведеної таблиці?...
marychka0783
26.06.2020 03:06
. Приписать к числу 125 слева и справа по одной цифре так, чтобы полученное пятизначное число делилось на 3; 4 и 7. Паскаль используя вложенные циклы и for...
goverdovskay123
14.03.2021 19:30
Дано описание массива: constb:array[1..5]ofinteger=(4,12,8,71,101); Верно ли описан массив?...
Sofja007
22.09.2022 08:47
с шифром, Сегодня Цезарь в зеркало [3] сказал: 11100010 10100000 10100111 11100010 10100000 10001101 11100010 10100000 10001011 11100010 10100000 10001001 11100010 10100000 10100100...
юра982
17.11.2020 23:03
Який вийде результат роботи прогрпми print(7 // 2)...
123478101934
22.09.2022 12:54
Наибольший объём информации человек получает при ?...
boosoosv
22.09.2022 12:54
Даны высказывания: а=идет дождь,b=прогулка отменяется,c= вымок,d=я останусь дома. запишите следующее сложное высказывание на языке логики: e=я не вымокну, если на улице нет дождя...
kivialisalittlee
22.09.2022 12:54
Переведите число 39 в фибоначчиеву систему счисления. если можно с объяснением большое...
fatimo4kkkka
22.09.2022 12:54
Объем сообщения — 7,5 кбайт. известно, что данное сообщение содержит 7680 символов. какова мощность алфавита....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var (a,b,c):=ReadReal3('Введите a.b.c:');
var p:=(a+b+c)/2;
Writeln('S=',Sqrt(p*(p-a)*(p-b)*(p-c)):0:3)
end.