Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
1649fn49
16.02.2022 09:42 •
Информатика
Составьте программу (блок схема и на паскаль) нахождения площади треугольника по формуле герона если извесны все три стороны
Показать ответ
Ответ:
NIKROSO
05.10.2020 22:33
Var
a,b,c,p,S:real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
WriteLn('S = ',S);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
8877580
30.06.2021 15:00
Вычислите y=cos корень из x+2/2x+12,где x-натуральные числа,y с дробной частью программа пасхаль.!...
blablaloshka
20.03.2022 15:08
Вгороде n, как это ни странно, живет ровно n детей. чтобы обеспечить их всех подарками к новому году фабрика деда мороза производит ровно n подарков. при этом,...
milka876
27.05.2023 10:03
2. Набор команд необходимых для компьютера.АлгоритмПрограммаКонструктортрансляторКоманда...
34234252
22.10.2021 12:29
Замените формулу, используя один вызов функции СУММ: =A3+A4+A5+B3+B4+B5...
anastasiatim4e2
13.03.2022 12:36
Для защиты от вредоносных программ нужно использовать антивирусы. Причиной проникновения вирусов на защищённые антивирусом компьютеры, могут быть разные, например:...
Georgy0335
04.12.2022 08:29
Таблица по информатике которые у меня есть...
Sanyaaa12
30.09.2020 22:25
Вывести массив Задан массив из n целых чисел. Вывести его элементы в столбик, не меняя первоначальный порядок. Входные данные Первая строка содержит число n (1...
Sapika
26.12.2022 01:43
Выпиши лишнее слово 1) Integer,real,boolean,begin,string,char 2) Begin,end,computer,var,program,const 3) Целый ,логический,служебный,строковый,символьный 4) Boolean,array,or,nor,and...
sogoyan2016
22.02.2021 08:36
Запишите описания переменных ( в одну сроку) 1)Описать переменную h целого типа 2)Описать переменные нужные для выполнения функции e=14d+9.15, если d -целого типа...
Angelochek02
04.02.2020 09:07
Сталкивались ли вы с алгоритмами, которые нельзя назвать линейными?...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
a,b,c,p,S:real;
Begin
Write('a = ');
ReadLn(a);
Write('b = ');
ReadLn(b);
Write('c = ');
ReadLn(c);
p:=(a+b+c)/2;
S:=sqrt(p*(p-a)*(p-b)*(p-c));
WriteLn('S = ',S);
End.