Решите! ! в цветовой модели rgb для кодирования одного пикселя используется 3 байта. фотографию размером2048×1536 пикселей сохранили в виде несжатого файла с использованием rgb-кодирования. размер получившегося файла равняется … a. 3 кбайт b. 3 мбайт c. 9 кбайт d. 9 мбайт

2048*1536=3145728 пикс1пикс=3байта3145728пикс=9437184байт=9мегабайтответ: d 

  d. 9 мбайт.

решение:

2048*1536=3145728 пикселей

3145728 * 3 = 9437184 байт 

9437184 / 1024 =  9216 килобайт ~~ 9мб

 

 

 

 

 

 

 

 

 

 

 

Не особо знаю паскаль, так что дабы не накосячить с синтаксисом, покажу на примере. тут всё просто - тебе лишь нужен цикл for и расчет процентов. for i = 1 to 100 percents = fix(x * p / 100) ' здесь у нас есть переменная percents, которой присваиваются округленные функцией fix проценты (насколько я знаю, в паскале аналогичная функция называется round) x = x + percents 'тут всё понятно - переменной x присваивается она сама и годовые проценты по вкладу if x > = y then 'проверяем, не равен или не превысил  ли наш вклад ожидаемую сумму print i 'в цикле for можно не заморачиваться с отслеживанием лет, переменная i сама подсчитает количество итераций-лет end 'завершаем программу end if next i ' конец цикла можно ещё чисто для себя добавить в условие вывод переменной x, чтобы было нагляднее.   

Код: procedure tform1.button1click(sender: tobject); var kolo,kolp,i,n: integer; a: array[1..1000] of integer; begin n: =memo1.lines.count; kolo: =0; kolp: =0; for i: =1 to n do   begin   a[i]: =strtoint(memo1.lines[i-1]);   if a[i]> 0 then kolp: =kolp+1;   if a[i]< 0 then kolo: =kolo+1;   end;   showmessage('количество положительных: '+inttostr(kolp));   showmessage('количество отрицательных: '+inttostr(kolo)); end;     оформление: