Вопрос по информатике:
Даны три числа a, b, c. Проверить могут ли эти числа быть дли-
нами сторон треугольника. Если да, то вычислить и напечатать периметр и
площадь треугольника со сторонами a, b, c. Если нет, то печатать число 0.
p.s. напишите код для PascalABC.NET
Трудности с пониманием предмета? Готовишься к экзаменам, ОГЭ или ЕГЭ?
Воспользуйся формой подбора репетитора и занимайся онлайн. Пробный урок - бесплатно!
- 10.03.2018 04:39
- Информатика
- remove_red_eye 16577
- thumb_up 35
Ответы и объяснения 1
Var
a,b,c,p,s:real;
begin
Write('Введите стороны треугольника: ');
Read(a,b,c);
if ((a+b)>c) and ((a+c)>b) and ((b+c)>a) then begin
p:=(a+b+c)/2;
s:=sqrt(p*(p-a)*(p-b)*(p-c));
Writeln('p=',2*p:0:2,', s=',s:0:4)
end
else Writeln('0')
end.
- 11.03.2018 12:32
- thumb_up 14
Знаете ответ? Поделитесь им!
Есть сомнения?
Не нашли подходящего ответа на вопрос или ответ отсутствует? Воспользуйтесь поиском по сайту, чтобы найти все ответы на похожие вопросы в разделе Информатика.
Трудности с домашними заданиями? Не стесняйтесь попросить о помощи - смело задавайте вопросы!
Информатика — наука о методах и процессах сбора, хранения, обработки, передачи, анализа и оценки информации с применением компьютерных технологий, обеспечивающих возможность её использования для принятия решений.