Задача 1. «Квартиры» решите пожалуйста на языке паскаль По проекту строительства многоэтажный жилой дом должен был содержать n подъездов и k этажей, на каждом этаже в каждом подъезде должно быть ровно p квартир. Затем проект был изменён, при этом количество этажей уменьшилось на 3, а количество подъездов увеличилось на 2. Количество квартир на каждом этаже в каждом подъезде не изменилось. Оказалось, что общее количество квартир в доме при этом увеличилось. Определите, на сколько увеличилось количество квартир в доме.
Var n,k,p,i:integer; begin writeln('под., эт., кв.'); readln(n, k, p); i:=n*k*p; k:=k-3; n:=n+2; i:=n*k*p-i; writeln(i); end.