Показать сообщение отдельно
Старый 22.03.2011, 20:36   #2 (permalink)
shrek=)
Студент БГПУ
 
Аватар для shrek=)
 
Регистрация: 06.02.2010
Сообщений: 420
Записей в дневнике: 3
Сказал(а) спасибо: 1
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 470
По умолчанию

Вот программа, но без углов. Может формулу подскажите доделаю!
Код:
var
s,d2,d1,c:real;
begin
writeln ('Введите диагонали (в сантиметрах)');
readln (d1,d2);
c:=sqr(d1/2)+sqr(d2/2);
c:=sqrt(c);
s:=(d1*d2)/2;
writeln ('Сторона равна ',c:1:4,'Площадь равна',s:2:1);
readln
end.
shrek=) вне форума   Ответить с цитированием
Ads

Яндекс

Member
 
Регистрация: 31.10.2006
Сообщений: 40200
Записей в дневнике: 0
Сказал(а) спасибо: 0
Поблагодарили 0 раз(а) в 0 сообщениях
Репутация: 55070