№ 1. Сколько цветов будет содержать палитра, если на один пиксель отводится 3 бита памяти?
№ 2. Найдите объём видеопамяти растрового изображения, занимающего весь экран монитора с разрешением 1024×768, и глубиной цвета изображения 32 бита. ответ должен быть выражен в Мб. № 3. Рассчитайте объем видеопамяти в Кбайтах, необходимой для хранения графического изображения, занимающего весь экран монитора с разрешением 1600 х 1200 пикселей и количеством отображаемых цветов 16 777 216.
№ 4. Цветной рисунок состоит из 65536 цветов и занимает 3 Кб информации. Из скольких точек состоит данный рисунок?
Uses crt;
var n,l:integer; s:string;
Begin
read(n);
str(n,s);
l:=length(s);
if (s[1]<>s[2]) and (s[2]<>s[3]) and (s[1]<>s[3])
then begin writeln('Одинаковых цифр нет') end
else writeln('Одинаковые цифры присутствуют');
end.
Б) Program Stroke;
Uses Crt;
Var s: string; n,i,j,l: integer;
Begin
ReadLn(n);
str(n,s);
l:=length(s);
j:=0;
for i := 1 to l div 2 do begin
if s[i]=s[length(s)-i+1]
then j:=1 end;
if j=1 then
writeln('Да, число является палиндромом')
else writeln('Нет, число не является палиндромом');
End.