Вычислить длину окружности на языке поскаль

Ну раз поскакаль, то так

l:=2*3.14*r;

Эта команда рассчитает длину окружности по радиусу.
Если нужна программа полностью - надо уточнять это в условии.