На заводе необходимо разлить N литров молока в бидоны. Имеется неограниченное число бидонов объемом 1 литр, 5 литров и 6 литров. Определите, какие бидоны нужно использовать, чтобы все бидоны были заполнены и их количество было минимальным. Входные данные Входная строка содержит одно натуральное число – количество литров молока N , которое нужно распределить по бидонам. Известно, что N ≤ 1000 . Выходные данные В первой строке программа должна вывести количество использованных бидонов, а во второй – объемы этих бидонов в порядке убывания (невозрастания).

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

type

person=record

fam: string;

imya: string;

day: integer;

end;

var

a: array[1..50] of person;

i,n,z: integer;

begin

write('n='); readln(n);

for i: =1 to n do

begin

write('fam-'); readln(a[i].fam);

write('imya-'); readln(a[i].imya);

write('day-'); readln(a[i].day);

end;

write('z-'); readln(z);

for i: =1 to n do

if a[i].day=z then writeln (a[i].fam, ' ',a[i].imya);

readln;

end.

нельзя, ведь текст отсканирован а не скопирован!

дано:

g= 44,1 кгц=44100 гц

t= 1 мин=60 сек

v= 15 мбайт

i-?

решение:

i=v/g*t

i= (15*8*1024*1024 бит)/(44100гц*60сек)= 48 бит