В квадратной комнате шириной a и высотой b Есть окно и дверь с размерами c на d , m на n соответсвенна. Вычислите для оклеевания обоев
Pascal Program room; Var a, b, c, d, m, n, S, o : real; Begin Readln(a, b, c, d, m, n); S = a*b*4; O = c*d + m*n; S = S - O; Writeln(S); End.