Программа для решения задачи:
var s:string; i,k,n:integer;
begin
s:='acacabbababaaaabacbb';
k:=0;
n:=length(s);
for i:=1 to n div 2 do
if s[i]<>s[n+1-i] then k:=k+1;
writeln(' количество замен = ',k);
<span>end.
количество замен = 9
</span>
1*2^4+0+0+1*2^1+1*2^0=16+2+1=19 -целая часть
0.53125 дробная
число 19.53125
begin
var ss := ReadSeqInteger(ReadlnInteger('n ='));
ss.Count(x -> (x > 0) and (x mod 5 = 0)).Println;
end.
<em><u>Задача 1.</u></em>1. Найдем общее количество точек: 1024 х 768.
2. Переведем 16 бит в байты: 16 / 8 = 2
3. Запишем объем видеопамяти в байтах: 1024 х 768 х 2
4. Переведем объем в мегабайты: (1024 х 768 х 2) / (1024 х 1024 ) = 768 х 2 / 1024 = 1.5
<em><u>Ответ: 1.5 Мб</u></em><em><u>Задача 2.</u></em>1. Определим количество бит, необходимое для отображения 65636 цветов.
Можно вычислить напрямую:
, а можно просто вспомнить, что
.
2. Переведем найденное количество бит в байты: 16 / 8 = 2
3. Мегапиксель (Мп) - это ровно один миллион пикселей. Поэтому 1.5 Мп - это 1 500 000 пикселей..
4. Вычислим ёмкость в байтах: 1500000 х 2 = 3000000
5. Переведем емкость в мегабайты: 3000000 / (1024 х 1024 ) ≈ 2.86
<em><u>Ответ: примерно 2.86 Мб</u></em>
Ответ:
a = float(input("Введите в каких единицах измерения будите вводить числа. 1 - килобайты, 2 - мегобайты, 3 - гигобайты... (терабайт, петабайт, эксабайт, зеттабайт, йоттобайт) "))
b = float(input("введите число "))
vid = float(input("введите в какие единицы хотите перевести число (см первую запись) "))
d = 1024**a * b
er = 1024**vid
print(d/er )
Объяснение: