tutotveti.ru
Предметы
Биология
Українська мова
Музыка
Французский язык
Физика
МХК
Обществознание
Психология
ОБЖ
Право
Беларуская мова
Литература
Химия
Українська література
Экономика
Немецкий язык
География
Информатика
Қазақ тiлi
Геометрия
Английский язык
Русский язык
Окружающий мир
Алгебра
История
Другие предметы
Видео-ответы
ПОИСК
Войти
Регистрация
Информатика
Найти площадь треугольника
Найти площадь треугольника по трем сторонам
alexanrrr
2 01.06.2019 02:20
1
Ответы
жигер21
02.07.2020 11:27
Program as;
var a,b,c,d,p,s:real;
uses crt;
clrscr;
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(s);
readln;
end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
даша3335
29.05.2019 09:00
Статья, набранная на компьютере, содержит 8 страниц, на каждой странице 40 строк, в каждой строке 64 символа. в одном из представлений unicode каждый символ кодируется...
irca1987
29.05.2019 09:00
Сообщите записанное буквами 128-символьного алфавита, содержит 30 символов. каков объем информации оно несет?...
0505levon
29.05.2019 09:00
Дан массив состоящий из 20 целых чисел. требуется найти среднее арифметическое его нечетных элементов?...
Ionа1
29.05.2019 09:00
Определите скорость модема, если за 250с. он может передать растровое изоброжение размером 800*600 пикселей. на каждый пиксель приходиться 3 байта....
Welta05
29.05.2019 09:00
Определить значения логических выражений при заданных значениях переменных a и b. a = true b = true a and b andnot a or a or not b not a and (b and a) or (a or not...
daniil359
29.05.2019 09:00
Как в экселе полностью выделить лист, щелкнув мышь на пересечении названий столбцов и строк, чтобы при этом на последующем листе, при вставке, значения таблиц поменялись?...
Серый43а
29.05.2019 09:00
111010 + 11101=? (в двоичной системе)...
VanilkaII
29.05.2019 09:00
Функция преобразующая десятичное число в шестнадцатеричное 1)oct 2)hex 3)chr 4)acs...
ser73
29.05.2019 09:00
10000+1000*10=? (двоичная система)...
marimitul
29.05.2019 09:00
Одинаковые ли значения примет с после выполнения фрагментов программ? а)а: =-1; b: =5; c: =16 if (a 1)or (b=0) then c: =a+b; b)a: =9; b: =7; c: =10 if (a 0) and (b=7)then...
Популярные вопросы
Какие художественные средства использует автор к.м.симонов в стихотворении...
1
Надо к завтра доклад! тема зодчество. когда появилось где появилось...
1
Качества хозяйки медной горы ( хозяйки медной ! ) ,а не какая...
2
Who is 7 years old? who has got his birthday on the 15th of march?...
3
1.what / favourite holiday? when / celebrate? 2. where / celebrate?...
3
Заполните таблицу с круговой диаграммы. всего цветов на клумбе...
2
5-6 речень на тему нові пригоди аліси...
2
Чем он похож на обычного мальчика составьте рассказ наш друг электроник...
2
Запишите число ,в котором 6 единиц пятого разряда, 7 единиц третьего...
2
Юлия друнина : разговор с подругой найти...
3
var a,b,c,d,p,s:real;
uses crt;
clrscr;
begin
readln(a,b,c);
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
writeln(s);
readln;
end.