В квадратной комнате шириной А и высотой В есть окно и дверь с размерами C на D и М на N соответственно вычислите площадь стен для оклеивания их обоями.
Var a,b,c,d,m,n:real;
begin
writeln(Введите размеры комнаты (a,b));
readln(a,b);
writeln(Введите размеры окна (с,d));
readln(c,d);
writeln(Введите размеры двери (m,n));
readln(m,n);
writeln(Площадь для оклейки: ,a*b-c*d-m*n);
end.
Оцени ответ
