Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
papa63428
03.10.2022 04:55 •
Информатика
Записать на языке паскаль! дано длинное число (записать, как строку) составить из его цыфр минимальное число, используя все цифры. 0 в начале ставить нельзя, только после первой цифры. заранее .
Показать ответ
Ответ:
vnnu
08.10.2020 15:03
PascalABC.NET 3.3.5, сборка 1662 от 29.04.2018
Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString.OrderBy(c->c).ToArray;
var i:=s.FindIndex(t->t<>'0'); Swap(s[0],s[i]);
s.Println
end.
Пример
54560345345601323451233903454658345034521212
10000111222223333333334444444455555555566689
0,0
(0 оценок)
Популярные вопросы: Информатика
yakovenko040320
02.12.2020 18:42
1. Текст занимает 0,25 килобайта памяти компьютера. Сколько символов содержит текст. 1. 32 2. 250 3. 256 4. 2048 5. 1024 2. Расставьте знаки , = , в следующей цепочке:...
Naruto1111111111
14.07.2021 19:53
Введите маску для выбора всех файлов, имя которых начинается с буквы z, а расширение заканчивается на букву a...
knyzeva2804
20.01.2023 17:26
Запишите следующие высказывания в виде логического выражения,определив простые высказывания и используя логические операции: а) число 2005 нечетное и четырехзначное.б)...
петя212
09.01.2023 10:33
~~тест по теме «файл и файловая система» вариант 1 1. поименованная информация, хранящаяся в долговременной памяти компьютера: 1) файл 2) папка 3) программа 4) каталог...
kaaanrakun
26.03.2023 03:48
Графики функций! 1. y=(x+1)^1/3 2. y=(3x+2)^1/2-1...
LLLLLina
26.03.2023 03:48
Назовите наиболее крупные реки нашей страны,указав их принадлежность к тому или иному бассейну (бассейн атлантического океана,бассейн северного ледовитого океана,бассейн...
артbig
26.03.2023 03:48
Суравнениями, ) fes - so2 - k2so3 - so2 нужно от k2so3 к so2 нужно ещё сложить ионное уравнение...
ls0xhand
26.03.2023 03:48
Прямая y=kx+b проходит через точки а (-2; -15) и в (0,5 ; -5). найдите уравнение этой прямой...
007238
26.03.2023 03:48
Кто читал сербские сказки? .: прочитай различные сербские сказки.найди слова и предложения,характеризующие автора.выпиши некоторые из них. я вообще не поняла ....
Amyy1
26.03.2023 03:48
Дать название соединения. указать внешнюю, внутреннюю сферу, лиганды, 9 координационное число, комплексообразователь, написать диссоциацию комплексного соединения:...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString.OrderBy(c->c).ToArray;
var i:=s.FindIndex(t->t<>'0'); Swap(s[0],s[i]);
s.Println
end.
Пример
54560345345601323451233903454658345034521212
10000111222223333333334444444455555555566689