Var s: string; a, b: char;
begin
readln(s);
readln(a, b);
for i:= 1 to length(s) do if s[i] = a then s[i] := b;
writeln(s);
end.
Нине кубики Кате шоколадку Коле плюшевого мишку, а Ване книгк
В четырехцветном изображении для хранения одной точки требуется log(2)4 = 2 бита; в изображении с 16-цветной палитрой - log(2)16 = 4 бита. В том же объеме памяти в этом случае можно сохранить изображение, содержащее в 2 раза меньше точек, т.е. 300*200 / 2 = 30000. Если не изменять пропорции, то размер изображения ≈ 212*141