Некое растровое изображение было сохранено в файле 1, как 24-разрядный рисунок. во сколько раз будет меньше информационный объем файла 2, если в нем это же изображение сохранить как 16-цветный рисунок?

16/24 = 2/3 2/3* (1) = (2) 2 файл будет составлять 2/3 от первого или 2  файл будет в 2/3 раза меньше первого

Program uva;   var m,k: integer; //объявляются переменные, отвечающие за вес пакетов begin   write('введите массу первого пакета');     read(m);   //ввод массы первого пакета write ('введите массу второго пакета'); read (k); //ввод массы второго пакета   if m> k then      write ('масса первого пакета больше второго и равна ', m)    else if k> m then     write ('масса второго пакета больше первого и равна ', k)   else write  ('массы пакетов одинаковы и равны ', m); //если масса первого       //пакета больше, то она выводится на экран иначе если масса второго пакета //больше, то она выводится на экран иначе массы равны и выводится на         //экран любия из этих масс end.

Program uva; begin   write(1000/((50*50*40)/1000000)/2.5, "лимонов и "1000/((50*50*40)/1000000)/2.5*1.5 " апельсинов"  ); //50*50*40 ищется объём одной коробки, /1000000 переводится в метры,  //1000/((50*50*40)/1000000) ищется количество коробок. нам нужно засунуть в // коробки как можно больше лимонов, т.к. они дороже. но их максимальное  //количество соотносится с апельсинами как 1: 1,5. всего частей 1+1,5=2,5 //лимоны отсюда одна часть, значит делим все коробки на количество //частей и получаем количество лимонов. а количество апельсинов просто  //умножаем количество лимонов на 1,5 end.