Ну ты хоть картинку скинь с этой страницой
а) В одном Гбайте - 1000 мб. Следовательно, ответ: 5100 Мбайт, или 5,1 Гбайт;
б) По такой же схеме, тогда у нас ответ: 11
1)
var
s: string;
begin
writeln('Введите строку: ');
readln(s);
if pos('а', s) <> 0 then writeln('В строке есть буква "а"')
else writeln('В строке нет буквы "а"');
end.
2)
var
s: string;
i, a: byte;
begin
a := 0;
writeln('Введите строку: ');
readln(s);
for i := 1 to length(s) do if s[i] = 'м' then a := a + 1;
writeln('В строке буква "м" встречается ', a, ' раз(а)');
end.
3)
var
s: string;
begin
writeln('Введите строку: ');
readln(s);
while pos('и', s) <> 0 do delete(s, pos('и', s), 1);
writeln('Строка после удаления букв(ы) "и": ', s);
end.
Узнаем, сколько бит используется для кодирования одного пикселя:
256=2^x
x=8
Рассчитаем объем в килобайтах:
64*64*8/8/1024=4Кбайт