1)5292000 байт
2)1320000 байт
3)2640000 байт
4)3840000 байт
Сначала находим вес всего сообщения, т .е.2 *25=50 кбит
тогда количество символов в сообщении равно 50 кбит=51200 бит
51200/2=25600
теперь находим количество символов на странице
25600/25=1024 символа
Тогда вот, все по букве задания
var
s : string;
t : char;
i : integer;
begin
readln (s);
read (t);
i := 1;
while (i <= length (s)) do
begin
if s[i] = t then delete (s, i, 1)
else i := i + 1;
end;
writeln (s);
<span>end.</span>
Var st,sk:integer;
begin
readln(st);
if st>1000
then sk:=trunc(st*0.95)
else if st>500 then sk:=trunc(st*0.97)
else sk:=st;
writeln(sk);
end.
Пример:
3000
2850