Все банально. Можно объяснить разными способами,я подобрал для тебя попроще вариант... Иными словами задание можно охарактеризовать как перевод 4гб в биты. Из школьного курса нам известно,что 1 гб = 2^33 бит. Необходимо просто умножить на 4, тогда 4 * 2^33. Представим как 2^2 * 2^33. Ответ: на диске 2^25 бит объем
С д е ф г т.к это все мы обрабатываем и делаем какое-либо действие
Var
otvet:String;
i:integer;
S0,S:String;
C:char;
begin
//Считывание данных
Writeln('Введите строкy S');
readln(S);
Writeln('Введите строкy S0');
readln(S0);
Writeln('Введите символ C');
readln(C);
//Цикл посимвольная обработка строки
for i:=1 to length(S) do
begin
//Программа вставляет подстроку S0 в строку S
//перед каждым символом C
//Сохраняя результат в otvet
if S[i]=C then
Otvet:=otvet+S0+C
else
Otvet:=otvet+S[i];
end;
Writeln('Ответ:', otvet);
<span>end.</span>
Ответ прикреплен в документе Word