Составить программу в 1.площадь треугольника по 3-м его сторонам: var a,b,c, p: integer; pp, s: real; begin (дальше)
aselznala2004
1
29.09.2019 00:30
2
Другие вопросы по теме Информатика
marinka10k
12.09.2019 14:10
Юлия45684
07.09.2019 05:40
olga170103
07.09.2019 05:40
113Diana113
07.09.2019 05:40
Resh4tor1337
07.09.2019 05:40
tinkimolko
07.09.2019 05:50
adilymnuk
07.09.2019 05:50
FenomeN1703
07.09.2019 05:50
RMDEL
07.09.2019 05:50
Популярные вопросы
- Вдвух цистернах находится бензин, причем в первой в три раза больше. когда из...
1 - Могут ли дождевые черви жить в песке...
3 - Куда переносится кровью питательные вещества излишки воды и солей излишки тепла...
3 - Укажите где верно записано в виде десятичной дроби число 77 целых13 десятичных...
3 - Вшольную столовую 120 кг лука, свёклы -на 56кг меньше чем лука, а моркови-в 2...
2 - 80 дециметров равно скольким метрам...
3 - Раскройте скобки, употребляя глаголы в одном из следующих времен: present simple,...
3 - Запиши словосочетания.попробуй определить спряжениеглаголов(укажи цифру спряжения...
3 - Сделать 5 про скорость 1)плот проплыл 20 км за 5 ч какова скорость движения плота...
2 - Вкаких случаях к уголовной ответственности привлекаются лица 14 летнего возраста...
3
Площадь треугольника по 3-м его сторонам:
Var a,b,c, P: integer;
PP, S: real;
Begin
readln(a);
readln(b);
readln(c);
PP := ( a + b + c ) / 2;
S := sqrt(PP*(PP-a)*(PP-b)*(PP-c));
writeln('ответ(округлен до тысячных): ' + S:0:3);
end.