Пусть элементами круга
являются радиус (первый элемент), диаметр (второй элемент) и длина окружности
(третий элемент). Составить программу, которая по номеру элемента запрашивала
бы его соответствующее значение и вычисляла бы площадь круга.
Решение на паскале!

var
  a: real;
  k: byte;

begin
  writeln(1 - l okp.);
  writeln(2 - r okp.);
  writeln(3 - d okp.);
  readln(k);
  readln(a);
  write(S = );
  case k of
    1: writeln(sqr(a) / (4 * Pi):0:2);
    2: writeln(Pi * sqr(a):0:2);
    3: writeln(Pi * sqr(a / 2):0:2);
    else writeln(?);
  end;
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.