Даны два круга с общим центром и радиусами R1 и R2 (R1 > R2). Найти площади этих кругов S1 и S2, а также площадь S3 кольца, внешний радиус которого равен R1, а внутренний радиус равен R2. S1 = π·(R1)2, S2 = π·(R2)2, S3 = S1 – S2. В качестве значения π использовать 3.14 — Pascal(Паскаль)

program okr;
const pi = 3.14;
var R1, R2, S1, S2, S3: real;
begin 
    write('Введите два радиуса: ');
    read(R1, R2);
    S1 := pi * sqr(R1);
    S2 := pi * sqr(R2);
    S3 := S1 - S2;
    writeln('Площадь большего круга -- ', S1:5:2);
    writeln('Площадь меньшего круга -- ', S2:5:2);
    writeln('Площадь кольца -- ', S3:5:2);
end.