помогите написать программу на паскале которая решит 19 задание

нужно откомпилировать, он нашел синтаксическую ошибку в 3 строке

var r1,r2,s:real;beginwrite('r = ');readln(r1);write('R = ');readln(r2);s:=pi*(r2*r2-r1*r1);writeln('S = ',s:5:2);end.Пример:r = 2.87R = 8.51S = 201.64