Question

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

Answer 1

  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.
если формула гдето неверная то сори