Посчитаем
1-9 9 цифр
10-99 2*90=180 цифр
100-199 3*100=300 цифр
Получаем 9+180+300=489
502-489=13
200-203 12 цифр
И последняя цифра, которую сотрут, будет 2. Оставшееся число начнётся с 0
Var a,a1,a2,a3,a4,a5,b:integer;
begin
write('a = ');
readln(a);
a1:=a div 10000;
a2:=a div 1000 mod 10;
a3:=a div 100 mod 10;
a4:=a mod 100 div 10;
a5:=a mod 10;
b:=a5*10000+a4*1000+a3*100+a2*10+a1;
writeln('b = ',b);
end.
Пример:
a = 13524
b = 42531
В 1 гб. - 1000 мб.
В 1 мб.- 1000 кб.
В 1 б. - 1 бт.
Интернет, литература, сми, живое общение, самообразование и просто образование...
Мы получили 1/10 всей информации т.к нам открыли 1 из 10-ти букв