В квадратной комнате шириной a и высотой b Есть окно и дверь с размерами c на d , m на n соответсвенна. Вычислите для оклеевания обоев

PascalProgram room;Var a, b, c, d, m, n, S, o : real;BeginReadln(a, b, c, d, m, n);S = a*b*4;O = c*d + m*n;S = S - O;Writeln(S);End.