Какое решение? Ты фото скинь потом уже будем решать :D
<u>PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018</u>
<u>Внимание! Если программа не работает, обновите версию!</u>
begin
var s:=ReadlnString.OrderBy(c->c).ToArray;
var i:=s.FindIndex(t->t<>'0'); Swap(s[0],s[i]);
s.Println
end.
<u>Пример</u>
54560345345601323451233903454658345034521212
10000111222223333333334444444455555555566689
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var (n,k):=(ReadInteger,0);
while n>0 do (n,k):=(n div 10,k+1);
Writeln(k)
end.
я так понимаю, что тебе нужно найти, все ли цифры 3 написаны? Если да, то нужно всего нажать на две клавиши на клавиатуре,: ctrl + f
Да будет, отличаться будет типом данных. так же в зависимости во что ты конвектируешь он может изменить и свой размер, но насчет второго могу ошибаться, но в закрепление все же скажу что это зависит от сжатия файла, ну к примеру если оригинальную песню (купить прям лицензионный диск какого нибудь исполнителя) и конвектировать его в mp3, то его размер должен будет уменьшиться, как и качество самого трека