Question

Задача 1. «Квартиры» решите пожалуйста на языке паскаль По проекту строительства многоэтажный жилой дом должен был содержать n подъездов и k этажей, на каждом этаже в каждом подъезде должно быть ровно p квартир. Затем проект был изменён, при этом количество этажей уменьшилось на 3, а количество подъездов увеличилось на 2. Количество квартир на каждом этаже в каждом подъезде не изменилось. Оказалось, что общее количество квартир в доме при этом увеличилось. Определите, на сколько увеличилось количество квартир в доме.

Answer 1

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.