ПОМОГИТЕ Безотлагательно !!! БУДУ ОЧЕНЬ ВАМ Признательна!!!!1. Перед погрузкой в грузовой

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

Задать свой вопрос
1 ответ
Var
x,nb,nm,z,xm,xb : longint;
h,g,k : integer;
begin
writeln('Введите количество великих коробок.');
readln(nb);
writeln('Введите количество махоньких коробок.');
readln(nm);
writeln('Введите количество продукта в больших коробках.');
readln(xb);
writeln('Введите количество продукта в малюсеньких коробках.');
readln(xm);
writeln('Сколько продукта вмещается в вагон?');
readln(x);
z:= nb*xb +nm*xm;
if z lt;= x then
writeln('Все изделия поместятся в один вагон')
else
begin
h := z div x;
writeln('количество вагонов для погрузки всех продуктов = ',h);
end;
g:= z div nb;k:= z div nm;
writeln ('освободиться ',g,' великих либо ',k,' малюсеньких коробок');
end. 

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт