ПОМОГИТЕ СРОЧНО !!! БУДУ ОЧЕНЬ ВАМ БЛАГОДАРНА!!!!
1. Перед погрузкой в грузовой вагон на перроне находится NB бальных и NM малых коробок с изделиями, которые упакованы соответственно по XB штук в больших коробках и по ХМ штук в малых. Сколько может освободиться больших коробок и сколько малых, если подадут вагон, в который помещается Z штук этих изделий (разрешается грузить изделия без коробок) ? Поместятся ли все приготовленные к погрузке изделия в один вагон, если "нет", то сколько потребуется вагонов для их отправки ?
ПРОГРАММА ПАСКАЛЬ и БЛОК-СХЕМА !!!!

varx,nb,nm,z,xm,xb : longint;h,g,k : integer;beginwriteln('Введите количество больших коробок.');readln(nb);writeln('Введите количество маленьких коробок.');readln(nm);writeln('Введите количество товара в больших коробках.');readln(xb);writeln('Введите количество товара в маленьких коробках.');readln(xm);writeln('Сколько товара помещается в вагон?');readln(x);z:= nb*xb +nm*xm;if z <= x thenwriteln('Все изделия поместятся в один вагон')elsebeginh := z div x;writeln('количество вагонов для погрузки всех товаров = ',h);end;g:= z div nb;k:= z div nm;writeln ('освободиться ',g,' больших или ',k,' маленьких коробок');end.