С Т Е П. А Н
19 20. 6 17 1. 15
Это код- каждая буква соответствует своему номеру в алфавите.
Например: А-первая буква в алфавите.
Объем изображения 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 Кбайт служебной информации.
А объем флешки: 3 Гбайт= 3072 Мбайт
Свободное место 10\%= 307,2 Мбайт
Поэтому презентация уместится.
===== PascalABC.NET =====
begin
var n := ReadInteger('n =');
var a := ArrRandom(n, -99, 99);
a.Println;
var x := a.Where(p -> p > 0).ToArray;
var y := a.Where(p -> p < 0).ToArray;
x.Println;
y.Println
end.