var s:string;
i:integer;
begin
readln(s);
for i:= length(s) downto 1 do
if s[i]=',' then delete (s, i, 1);
writeln(s);
end.
Подобное действие приведет к тому, что операционная система не сможет определить приложение для открытия данного файла, что собственно говоря равносильно потере информации из этого файла для пользователя. Все, что ему останется - это подбирать приложения наугад. Значок файла при этом также изменится на неопределенный
На одну чашу гиря, на другую насыпает 2 г.
На одну чашу гиря и на 2 г из предыдущего шага, на другую насыпает 4 г.
На одну чашу гиря и 6 г из предыдущего шага, на другую насыпает 8 г.
На одну чашу гиря и 14 г из предыдущего шага, на другую насыпает 16 г.
Получил 14 + 16 г за 4 взвешивания.
Если цветовая палитра имеет 64 цвета, значит один пиксель занимет 6 бит информации, т к 2^6=64, из этого следует 1920*180*6=2 073 600 бит, чтобы записать ответ в МБ, нужно полученное число разделить на 2^23. Получится приблизительно 0,25 МБ