загадочный куь

[warca]

петя и вася нашли игру.у ниx есть ьольшой куь с реьром N.

Зная размеры ьольшого куьа и размеры малыx,вырезаемыxкуьов,вычислить оьем фигуры,полученой после того как все малые куьы ьудут вырезаны из ьольшого.

Вxодные данные:
N размер куьа(1<=N<=100)
вторая строка число Mколличество вырезаемыx куьов.
Следующих M строках содержиться четверка целых чисел X Y Z A,котоорые задают куб с углами (X Y Z) и (x+a,y+a,z+a).считайте что большой куб имеет координаты углов (0,0,0)и(n,n,n) ребра всех кубов паралельны осям координат (0<=x,z,z<=n)(0<a<=n)
выходные данные
целое число V обьем фигуры получившейся после ввырезания из большого куба всех малых кубов.

Пример:
3
1
1 1 1 1
выход:
26



вот что то я написал:

begin
readln(n);
readln(m);
e:=0;
vbol:=n*n*n;
for k:=1 to m do
readln(x,y,z,a);



и дальше я не могу сделать.помогите пожалуйста

[Mad_Cat]

файл крутите сами

var x,y,z,a,n,m,k,i,xi,yi,zi,s:longint;
ar:array[1..100,1..100,1..100] of byte;
function min(x,y:longint):longint;
begin
if x<y then min:=x
else min:=y;
end;
begin
s:=0;
readln(n);
fillchar(ar, sizeof(ar), 0);
readln(m);
for i:=1 to m do begin
readln(x,y,z,a);
for xi:=x+1 to min(x+a, n) do
for yi:=y+1 to min(y+a, n) do
for zi:=z+1 to min(z+a, n) do
ar[xi,yi,zi]:=1;
end;
for xi:=1 to n do
for yi:=1 to n do
for zi:=1 to n do
if ar[xi,yi,zi]=0 then inc(s);
writeln(s);
end.

что то куда не плюнь в разделе Олимпийская задача)

[warca]

спасибо а я ее немного по другому написал

[Arigato]

Сообщение от warca

петя и вася нашли игру.у ниx есть ьольшой куь с реьром N.

Зная размеры ьольшого куьа и размеры малыx,вырезаемыxкуьов,вычислить оьем фигуры,полученой после того как все малые куьы ьудут вырезаны из ьольшого.

Вxодные данные:
N размер куьа(1<=N<=100)
вторая строка число Mколличество вырезаемыx куьов.

Кнопка [Б] на клавиатуре поломалась?

[warca]

ага сейчас новую купил

[hon]

Сообщение от warca

петя и вася нашли игру.у ниx есть ьольшой куь с реьром N.

пиши куб, а не куь, а то пожалуюсь на мат.

[Leshii]

А как по мне так "+" автору за сломанную букву "Б", я хоть посмеялся, "загадочный куь"
Такие темы надо так сказать на полочку в коллекцию ставить.