Тебе требуется перевести значения из двоичной системы в восьмеричную, из восьмеричной в шестнадцатеричную.
Я уже отвечал вашему однокласснику, видимо ;) Ответ - -16
Общий объем памяти I = K * i
(K - кол-во пикселей, i - объем памяти на 1 пиксель/цвет или глубина цвета)
По формуле или
(N - кол-во цветов в палитре, i - глубина цвета)
Глубина цвета бит
Объем памяти K = 2048 * 1024 пикселей * 8 бит = 16777216 бит
16777216.0 бит = 2097152.0 байт = 2048.0 Кбайт = 2.0 Мбайт = 0.001953125 Гбайт
Кол-во изображений на флешке 4 / 0.001953125 = 2048 шт
Ответ: только что был этот вопрос: сделал такую же программу
program Test;
var
n, a, i, nmin, amin: Integer;
begin
Write ('Количество чисел: ');
ReadLn (n);
nmin := 1;
amin := MaxInt;
WriteLn ('Введите ', n, ' чисел:');
for i := 1 to n do begin
ReadLn (a);
if a < amin then begin
amin := a;
nmin := i;
end;
end;
WriteLn ('Вывод: ', amin, ' ', nmin);
ReadLn;
end.