Даны два натуральных числа.определить в каком числе первая цифра больше? написать программу

Var n, k: integer; begin         writeln('введите 2 числа через пробел');         readln(n, k);                 if (strtoint(inttostr(n)[1]) > strtoint(inttostr(k)[1])) then writeln('у первого числа первая цифра больше');         if (strtoint(inttostr(n)[1]) < strtoint(inttostr(k)[1])) then writeln('у воторого числа первая цифра больше');         if (strtoint(inttostr(n)[1]) = strtoint(inttostr(k)[1])) then writeln('у первого числа и воторого числа первые цифры равны'); end.

для расчёта информационного объёма растрового графического изображения (v) используем формулу: v = i * k, где i – глубина цвета - количество битов, требуемое для кодирования цвета пикселя; k – это количество этих пикселей (точек) в изображении, определяющееся разрешающей способностью соответствующего устройства компьютера, в данном случае – сканера.

разрешающая способность сканера – 256 (28) точек на дюйм. 1 дюйм = 2,54 см.

переведём см в дюймы: 12,7/2,54 = 5 д.; 10,16/2,54 = 4 д.

находим количество пикселей (k), умножая и горизонталь, и вертикаль на разрешающую способность сканера: 5 * 256 * 4 * 256

чтобы не пользоваться калькулятором, представим все возможные множители в степенях числа 2: 5 * 2⁸ * 2² * 2⁸ = 5 * 2¹⁸ (пикселей)

i = 16 = 2⁴ бит (глубина цвета)

помним, что 1 байт = 8 бит = 2³ бит; 1 кбайт = 1024 байта = 2¹⁰ байт = 2¹³ бит; 1 мбайт = 1024 кбайта = 2¹⁰ кбайт = 2²⁰ байт = 2²³ бит

считаем v или i, кто как пишет:

v = 2⁴ * 5 * 2¹⁸ = 5 *2²² бит/2²³ = 5 * 2⁻¹ мбайт = 5 * 0,5 = 2,5 мбайт (ответ)