Прикрепила решение картинкой
1Кб <span> </span> = 1024 байт = 8192 бит
2 килобайта = 1024х2=2048
1Мб <span>= 1024 Кб = 8 388 608 бит </span>
3Мб = 3х1024х1024=3145728 байт
1 бит=8 байт.
128 бит:8=16 байтов
1 символ - 8 бит (то есть 1 байт)
16 символов - 128 бит (16 байт)
Рупор? Знак? Сигнальный ракет?
Var n: longint;
k: integer;
begin
k:=0;
write('Введите число: ');
readln(n);
while n>0 do
begin
if n mod 10 mod 2<>0 then
k:=k+1;
n:=n div 10;
end;
writeln('В числе ',k,' нечетных цифр');
readln;
<span>end.</span>