: 8
Вычислить площадь треугольника со сторонами a,b,c по формуле Герона (Паскаль)
Ребят, не знаю правильно ли я выбрал раздел. Не кидайте помидорами если нет) Мне в универе дали одну маленькую задачу на паскале сделать. я данный язык не шарю совсем. Кто нибудь может помочь в написании? Нужно на завтра.. Может кто нибудь и ответит, кому не лень)
Задача.
Вычислить площадь треугольника со сторонами a,b,c за формулой герона, перевести тем самым условие конкретности предыдущих данных. (Длина всех сторон положительная, сумма длин двоих каких-нибудь сторон больше чем длина третей). Формула герона: я формулу герона опишу сразу на паскале что бы не кидать скрин: S:=scrt(p(p-a)*(p-b)*(p-c)).
Помогите пожалуйста с написанием)
Made In USSR!
: 3,657
правильно ли я выбрал раздел |
правильно, только название у темы не правильное
я данный язык не шарю совсем |
Кто нибудь может помочь в написании |
var a, b, c, s, p: real; begin readln(a, b, c); if (a > 0) and(b>0)and (c>0)and ((a + b > c) or (b + c > a) or (a + c > b)) then begin p := a + b + c;p := p / 2; s := sqrt(p * (p — a) * (p — b) * (p — c)); writeln(s); end else writeln(‘Data is incorrect’); end.
Я надеюсь тут бесплатно |
хочешь оплатить — кошельки в подписи (голда нынче не дёшева)
ФОРМУЛА ГЕРОНА. Площадь треугольника #shorts
«. В жизни я встречал друзей и врагов.В жизни много всего перевидал.Солнце тело мое жгло, ветер волосы трепал,но я смысла жизни так и не узнал. »
(c) Юрий Клинских aka «Хой»
Последний раз редактировалось Mad_Cat; 05.11.2013 в 17:50 .
Источник: www.programmersforum.ru
Пример. Вычислить площадь треугольника по формуле Герона: , гдеa, b, c – длины сторон треугольника, — полупериметр;
- Ввод значений a,bи с.
- Вычисление полупериметра
.
- Вычисление площади треугольника
.
- Вывод значения Sна печать.
Текстпрограммы:ProgramAreaTriangl; uses Printer; var a,b,c,p,s: real; Begin writeln (‘Введите длины сторон треугольника’); 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:12); readln; writeln(Lst,’Результаты решения задачи’); writeln; writeln (Lst,’ПлощадьтреугольникаS=’,s:12); writeln End. Результат решения задачи: Площадь треугольника S= 7.25470E+00
найти площадь треугольника. Формула Герона. Известны 3 стороны.
4.2. Основы работы в интегрированной среде Turbo Pascal
Основными опциями главного меню, которые используются при разработке и отладке простейших программ, являются: File,EditиRun.
4.2.1. Меню File
- набрать в поле Directorynameполное имя нового каталога и нажать [OK];
- выбрать нужный каталог или диск в поле Directorytree, нажать [Chdir] и затем [OK].
Источник: studfile.net
Расчет площади треугольника
В то далёкое время, когда Паша ходил в школу, ему очень не нравилась формула Герона для вычисления площади треугольника, так как казалась слишком сложной. В один прекрасный момент Павел решил избавить всех школьников от страданий и написать и распространить по школам программу, вычисляющую площадь треугольника по трём сторонам.
Одна проблема: так как эта формула не нравилась Павлу, он её не запомнил. Помогите ему завершить доброе дело и напишите программу, вычисляющую площадь треугольника по переданным длинам трёх его сторон по формуле Герона.
На вход программе подаются целые числа, выводом программы должно являться вещественное число, соответствующее площади треугольника.
a = int(input()) # ввод трех сторон треугольника b = int(input()) c = int(input()) p = (a + b + c) / 2 #расчет полупериметра для формулы Герона s = (p * (p — a) * (p — b) * (p — c))**0.5 #расчет площади по формуле Герона print (s)
Похожие записи:
- Эффективный ввод-вывод в разных языках программирования
- Django — доработка шаблона формы регистрации
- Периметр треугольника
- Расчет площади фигур
Источник: mob25.com