Обсуждение @ 1084. Пусти козла в огород @ Timus Online Judge

Online Judge	Задачи	Авторы	Соревнования
О системе Часто задаваемые вопросы Новости сайта Форум Ссылки	Архив задач Отправить на проверку Состояние проверки Руководство	Регистрация Исправить данные Рейтинг авторов	Текущее соревнование Расписание Прошедшие соревнования Правила

вернуться в форум

Обсуждение задачи 1084. Пусти козла в огород

why WA on test#3

Послано Головченко Дмитрий 10 май 2009 15:13

uses
SysUtils ,Math;

Var
a, R:integer;
s :Real;
begin
ReadLn(a,R);
If R > 0.5*a then
S := pi*R*R + 2*a*sqrt(R*R-0.25*a*a) -4*R*R*arcCos(0.5*a/R);
else S := pi * R*R;
WriteLn(S :0:3);
end.

Re: why WA on test#3

Послано RockmanXfile 25 янв 2010 21:49

You didn't write another one requirement for this programm