Pascal (Free) Пусть элементами круга являютс радиус (1-й элемент), диаметр (2-й элемент), длина окружности (3-й элемент). по номеру одного из перечисленных элементов и его значению вычислить площадь круга

Question

Кирилл

22 марта, 04:03

+3

Ответы (1)

Знаете ответ?

Томуля · Answer 1

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.