Треугольник

@Горбуша · Регистрация: 06.11.2009

Author24 — интернет-сервис помощи студентам

Написать прогу проверки, поместится ли в равносторонний треугольник с площадью P, в окружность с площадью S

@кот Бегемот · 25.11.2009, 21:29

Сообщение от Горбуша

Написать прогу проверки, поместится ли в равносторонний треугольник с площадью P, в окружность с площадью S

Pascal

var
s,p:real;
begin
readln(s,p);
if s/pi>4*p/(3*sqrt(3) then writeln('yes')else writeln ('no');
end.

@Горбуша · 25.11.2009, 22:37 **[ТС]**

почему то не решается задача ...вылетает когда пишешь

@кот Бегемот · 25.11.2009, 22:42

А так?

Pascal

var
s,p:real;
begin
writeln('vvedite ploshadi kruga i treugolnika');
readln(s,p);
if s/pi>4*p/(3*sqrt(3)) then writeln('yes')else writeln ('no');
end.

@Горбуша 1 / 1 / 1 Регистрация: 06.11.2009 Сообщений: 25
		1
	Треугольник 25.11.2009, 21:16. Показов 636. Ответов 3 Метки нет (Все метки) Написать прогу проверки, поместится ли в равносторонний треугольник с площадью P, в окружность с площадью S 0

@Горбуша 1 / 1 / 1 Регистрация: 06.11.2009 Сообщений: 25
	25.11.2009, 22:37 [ТС]	3
	почему то не решается задача ...вылетает когда пишешь 0

	25.11.2009, 22:42