Не видно, я ничего разобрать не могу
Var
i : integer;
count : real;
begin
count := 370000;
for i := 2014 to 2030 do
begin
writeln('Год ', i, ': ', Round(count));
count := count + count * 3 / 100;
end;
<span>end. </span>
128 символьный алфавит требует минимум 7 бит на символ. 40*50*3*7=42000 бит = 5250 байт
Объем изображения I=k*i*n , где k- количество точек, i- глубина цвета, n - количество слайдов
Глубина цвета i=㏒₂N, где N-количество цветов палитры
i=㏒₂256=8
I=1024*512*8*10/(8*1024*1024)= 5 Мбайт
Объем звука:
I= i*n*t, где i-глубина кодирования звука, n- частота дискретизации, t- время звучания.
I= 16*32000*40/(8*1024*1024)= 2,44 Мбайт
Общий объем слайд-шоу: 5 Мбайт+2,44 Мбайт= 7,44 Мбайт
Прибавляем сюда еще 10 Кбайт служебной информации.
Объем флешки: 2 Гбайт= 2048 Мбайт
Свободное место 10%= 204,8 Мбайт
Слайд-шоу уместится на флешку