Напишите на паскале программу, вычисляющую длину окружности и площадь круга одного и того же радиуса по формулам: c = 2πr, s = πr².

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

• Длина окружности: $C = 2 \pi r$

• Площадь круга: $S = \pi r^2$

Пример программы на Паскале:

pascal
Копировать код
program CircleCalculations;
uses math;
var
  radius, circumference, area: real;
begin
  { Ввод радиуса круга }
  writeln('Введите радиус круга: ');
  readln(radius);
  
  { Вычисление длины окружности }
  circumference := 2 * Pi * radius;
  
  { Вычисление площади круга }
  area := Pi * sqr(radius);
  
  { Вывод результатов }
  writeln('Длина окружности: ', circumference:0:2);
  writeln('Площадь круга: ', area:0:2);
end.

Объяснение программы:

1. В начале программы подключается модуль math, чтобы использовать константу Pi, которая представляет число π.

2. Пользователю предлагается ввести радиус круга. Для этого используется команда readln.

3. Далее рассчитывается длина окружности по формуле $C = 2\pi r$ и площадь круга по формуле $S = \pi r^2$.

4. Результаты выводятся на экран с двумя знаками после запятой.

Программа рассчитывает и выводит два значения: длину окружности и площадь круга для заданного радиуса.