5. 256-цветный рисунок содержит 120 байт информации. из скольких точек он состоит? 6. для хранения изображения размером 64х32 точек выделено 64 кбайт памяти. определите, какое максимальное число цветов допустимо использовать в этом случае. 7.сколько секунд потребуется модему, сообщения со скоростью 56 000 бит/с, чтобы передать цветное растровое изображение размером 640 х 480 пикселей, при условии что цвет каждого пикселя кодируется тремя байтами? 8.определите скорость работы модема, если за 256 с он может передать растровое изображение размером 640 х 480 пикселей (на каждый пиксель приходится 3 байта).

5. если всего 256 цветов, то на один пиксель отводится 8 бит (2^8 = 256), что равно 1 байту. если объем файла 120 байт, то в нём 120 точек. 6. изображение состоит из 64 * 32 = 2^6 * 2^5 = 2^11 пикселей и под него выделено 64 кб = 2^6 кб = 2^16 байт = 2^19 бит памяти. значит, на каждый пиксель отводится 2^19 / 2^11 = 2^8 = 256 бит. максимальное допустимое число цветов равно 2^256 (это равно  115792089237316195423570985008687907853269984665640564039457584007913129639936)7. в изображении 640 * 480 = 307200 пикселей, на каждый отводится 3 байта = 24 бита, тогда объём файла 307200 * 24 =  7372800 бит. модему на передачу потребуется  7372800 / 56000 = 131,7 с 8. объем файла уже вычисел,  7372800 бит. скорость передачи  7372800 / 256 = 28800 бит/с

Все решение в рисунке

чтение из файла обычно пишется readln(f,s) где f имя файловой переменной так что скорей всего нужно вставить

readln(input,s); s: =s+' '; f: =0; for i: = 1 to length(s) do beginif s[i]< > ' ' then r: =r+s[i]; if s[i]=' ' then begin k: =k+1; d[k]: =r; r: =''; end; end; readln(input,n); for i: = 1 to n do beginreadln(input,sait[i]); readln(input,tegs[i]); readln(input,pop[i]);

соответственно и запись в файл write(f,s)