Помогите пожалуйста
Найдите площадь закрашенной области.
Составить программу на языке Паскаль.

program z;const pi=3.14;var s1,s2,s3,s:real;begins1:=pi*sqr(4)/4; {это площадь 1/4 круга с радиусом 4 и центром в т.(0,0)}s2:=1/2*4*8; {это площадь большого прямоугольного треугольника слева от оси oY}s3:=1/2*2*4; {а это площадь маленького треугольника, который на рисунке "вырезали" из большого треугольника}s:=s1+s2-s3; {это сумма площадей сложной фигуры}writeln(s);end.