сервис вопросов и ответовДаны три стороны одного и три стороны другого треугольника. Эти треугольники равновеликие, т.е. имеют равные площади. пожалуйста помогите решить
5-9 класс|
|
в системе паскаль
Aqswdef
13 сент. 2013 г., 7:44:49 (10 лет назад)
Dreka
13 сент. 2013 г., 9:03:27 (10 лет назад)
var a, b, c, p,s,s1: real;
Enger
13 сент. 2013 г., 9:57:11 (10 лет назад)
program D1KPxx13;
uses crt;
var
a1,a2,a3,b1,b2,b3,s1,s2,p1,p2:real;
begin
readln(a1,a2,a3);
p1:=(a1+a2+a3)/2;
s1:=p1*(p1-a1)*(p1-a2)*(p1-a3);
readln(b1,b2,b3);
p2:=(b1+b2+b3)/2;
s2:=p2*(p2-b1)*(p2-b2)*(p2-b3);
if s1=s2 then
writeln('ravnovelikie')
else writeln(' ne ravnovelikie');
end.
Sofaliya
13 сент. 2013 г., 11:18:26 (10 лет назад)
Комментарий удален
Witchsnake
13 сент. 2013 г., 13:06:29 (10 лет назад)
т.е. проверить равновеликие или нет?
Kiska379
13 сент. 2013 г., 15:58:20 (10 лет назад)
проверить это условие
Ответить
Другие вопросы из категории
7. Для каждой из перечисленных моделей назовите действия, которые человек может выполнить и с ней, и с объектом-оригиналом:
• радиоуправляемая модель самолета;
• словесное описание куртки;
• план квартиры;
• чайник из пластилина в натуральную величину;
• мысленное представление о будущей поездке.
Какие действия могут быть выполнены только с оригиналом?
1. Приветствие участникам олимпиады от марсиан записано с помощью всех символов марсианского алфавита: ТЕВИРП!КИ! Сколько информации
оно несет?
A. 10 бит;
B.10 байт;
C.80 бит;
D. 30 бит;
E.30 байт.
Читайте также
даны два числа. Если первое число нечетное, то найти сумму кубов, а иначе - куб суммы. даны три числа. Если хотя бы одно из чи
сел - отрицательное, то найти Iа+ b+cI иначе а+b+c +d в корне.
Даны три числа. Если произведение данных чисел - отрицательное, то каждое число возвести в квадрат, иначе найти модуль каждого числа
ПОМОГИТЕ ОЧЕНЬ ПРОШУ
Номер 1:
Даны основание а и периметр Р равнобедренного треугольника.Составь программу определяющую боковые стороны треугольника
Номер 2:
Даны боковая сторона С и периметр Р равнобедренного треугольника.Составь программу определяющую основание этого треугольника.
ПОМОГИ ПОЖАЛУЙСТА
Пожалуйста помогите решить желательно все или хотя бы одну (P.S. программа для программы Turbo Pascal) 1.Написать программу, которая предлагает
ввести 3 значное число и находит сумму его цифр.
2. Написать программу, которая предлагает ввести 3 значное число и меняет порядок цифр наоборот. (123- 321)
3.Написать программу, которая предлагает ввести три числа с клавиатуры, находит их сумму, произведение и среднее арифметическое.
Даны три произвольных числа a,b,c, значение которых задают длины сторон треугольника. Выведите 0,если нельзя построить треугольник с такими длинами
сторон; 3,если получается равностороний треугольник; 2 равнобедренный; 1 в остальных случаях. Задача в Паскале!!!
Вы находитесь на странице вопроса "Даны три стороны одного и три стороны другого треугольника. Эти треугольники равновеликие, т.е. имеют равные площади. пожалуйста помогите решить", категории "информатика". Данный вопрос относится к разделу "5-9" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.