Вопрос, который вызвал трудности

Задан радиус окружности. Найти площадь и длину окружности (программа Паскаль)

Ответ экспертов Учись.Ru

Чтобы дать полноценный ответ, был привлечён специалист, который хорошо разбирается в теме «ЕГЭ (школьный)». Ваш вопрос звучал так: Задан радиус окружности. Найти площадь и длину окружности (программа Паскаль)

После обсуждения с другими специалистами сервиса мы пришли к выводу, что правильный ответ на ваш вопрос будет звучать следующим образом:

USES Crt;
VAR
   R : INTEGER;
   S,L: REAL;
BEGIN
  ClrScr;
  Write(‘ Введите радиус окружности   ‘);
  ReadLn(R);
  {Pi - зарезервированное значение}
  S:=Pi*R*R;    {Вычисление площади окружности}
  L:=2*Pi*R;     {Вычисление длины окружности}
  WriteLn(‘ Площадь окружности = ’,S:4:2);
  WriteLn(‘ Длина окружности = ‘,L:4:2);
END.