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

Question

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

Гость

Ответ(ы) на вопрос:

Accepted Answer

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.