С клавиатуры поочередно вводятся длины сторон 2-ух треугольников. Составить программку,

С клавиатуры поочередно вводятся длины сторон 2-ух треугольников. Составить программу, которая производит сопоставленье площадей треугольников.

( Решить с помощью процедуры. )

p.s. внизу моё решение!!!

Задать свой вопрос
1 ответ
Vara1,b1,c1,p1,a2,b2,c2,p2,s1,s2:real;
Begin
read(a1,b1,c1);
p1:=(a1+b1+c1)/2;
read(a2,b2,c2);
p1:=(a2+b2+c2)/2;
s1:=sqrt(p1*(p1-a1)*(p1-b1)*(p1-c1));
s2:=sqrt(p2*(p2-a2)*(p2-b2)*(p2-c2));
if s1=s2 then
writeln('=') else
if s1gt;s2 then
writeln('gt;') else
writeln('lt;');
End.
Регина Мигулько
после var пробел.
, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт