написать программу для вычисления длины и площади окружности если r= 5,9 ввод с клавиатуры

а длина окружности?

const pi=3,14;var r,s:integer;beginwrite('Введите радиус:');read(r);s:=2*pi*r;writeln('Площадь круга-',s);end.