Напишите программу для решения геометрической задачи.
1. Найдите длину окружности и площадь круга заданного радиуса.

огромное спасибо))

Program n1;var r: real;beginreadln(r);writeln('площадь круга: ',pi*r*r);write('длина окружности: ',2*pi*r);end.