Составить блок схему и программу к следующей .дана квадратная пластина с прямоугольным отверстием .известно сторона а=50, а стороны с=5 и в=10. найти заштрихованную площадь

Я так понимаю, что заштрихованной областью будет являться часть пластины без отверстия.
ПАСКАЛЬ
---
program abc;
var a,b,c,s1,s2,s:integer;
begin
a:=50; b:=10; c:=5;
s1:=a*a;
s2:=b*c;
s:=s1-s2;
writeln('площадь заштрихованной фигуры=',s);
end.
---