Сканируется цветное изображение размером 10 х 10 см (в квадрате) разрешающая способность сканера 600 х 1200 dpi, глубина цвета - 2байта. какой информационный объём будет иметь полученный графический файл? , с дано)

Дано: разрешающая способность сканера 600 х 1200 dpi. размер 10см x 10см. глубина цвета - 2байта. найти: каков информационный объём этого файла? решение: вначале переводим глубину цвета из байт в биты 2 байта * 8бит в байте = 16 бит вычисляем разрешение сканера в 1 дюйме квадрат 600*1200 = 720 000 пикселей в 1 дюйм^2 переводим размер картинки из квадратных сантиметров в квадратные дюймы. 10см = 3.937дюйма 10*10=100 см^2 = 3.937 * 3.937 = 15,5 дюйм^2 вычисляем количество пикселей в изображении 15,5 дюйм^2 * 720 000 пикселей в 1 дюйм^2 = 11 160 000 пикселей информационный объём вычисляем по формуле количество пикселей * глубину цвета = 11 160 000 пикселей * 16 бит = 178 560 000 бит. переводим в байты делением на 8. 22 320 000 байт или же делим на 1024*1024 чтобы получить количество мегабайт 21,29 мегабайт ответ: информационный объём сканированного изображения = 22 320 000 байт или 21,29 мегабайт

Var     s,s1: string;   i: integer; begin   readln(s); s1: ='';   for i: =length(s) downto 1 do s1: =s1+s[i]; writeln(s1); end.