Написать программы длины окружности и площадь круга
и объясните как это вообще делается
20б

// Модуль консоли
uses crt;
// Объявляем переменную для хранения ввода с клавиатуры. 
var R:integer;
begin     
// Выводим сообщение     
writeln('Введите радиус. ');     
// Вводим с клавиатуры данные     
readln(R);     
// Проводим расчеты     
writeln('P = ', 2 * 3.14 * R);     
writeln('S = ', 3.14 * R * R);
end.