ПОМОГИТЕ Безотлагательно !!! БУДУ ОЧЕНЬ ВАМ Признательна!!!!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.
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.
, оставишь ответ?
Похожие вопросы
-
Вопросы ответы
Новое
NEW
Статьи
Информатика
Статьи
Последние вопросы
Игорь 14 лет назад был на 8 лет моложе, чем его
Математика.
Два тела массами m1 и m2 находящие на расстоянии R друг
Физика.
В сосуде 4целых одна пятая литр воды что бы заполнить сосуд
Математика.
Двум малярам Диме И Олегу поручили выкрасить фасад дома они разделили
Разные вопросы.
найти порядковый номер 41Э если в ядре 20 нейтронов
Разные вопросы.
в ряду натуральных чисел 3, 8, 10, 24, … 18 одно
Математика.
Предприятие по производству с/хоз продукции на производство затратило 3527000 руб Валовый
Разные вопросы.
Математика, задано на каникулы. ВАРИАНТ 1004
НОМЕР 1,2,3,4,5,6,7,8.
Математика.
Имеются три конденсатора емкостью С1=1мкФ, С2=2мкФ и С3=3мкФ. Какую наименьшую емкость
Физика.
Из точки м выходят 3 луча MP MN и MK причём
Геометрия.
Облако тегов