Вопрос от посетителя
Pascal (Free) Пусть элементами круга являютс радиус (1-й элемент), диаметр (2-й элемент), длина окружности (3-й элемент). по номеру одного из перечисленных элементов и его значению вычислить площадь круга
Отвечает Илюха:
var i:integer;
s,v:real;
Begin
read(i,v);
case i of
1: s:=pi*v*v;
2: s:=pi*v*v/4;
3: s:=v*v/pi/4;
end;
writeln(s);
End.