В зависимости от введённого символа L, S, V программа должна вычислять длину окружности; площадь круга; объём цилиндра. Составить программу на паскале. 

  var a:string; begin   write('введите букву');   readln(a);   case a of    'L':write('L=2*pi*r');  // формула длинны окружности    'S':write('S=pi*r*r);  // формула площади круга    'V':write('V'=pi*r*r*h); // формула объёма цилиндра    else write(''буква должна быть L, S или V);   end; end. если формула гдето неверная то сори