Запишите на языке программирования Паскаль программу для вычисления площади заштрихованной фигуры.

var a,b,d,s: real;

begin

write('Введите a: ');

readln(a);

write('Введите b: ');

readln(b);

write('Введите d: ');

readln(d);

s:=a*b-PI*(d/2)*(d/2);

write('s = ',s);

end.