сервис вопросов и ответов1. Дано натуральное число n. Переставить его цифры так, чтобы образовалось минимальное число, записанное теми же цифрами.
10-11 класс|
|
Khmuradarya
26 марта 2015 г., 0:56:06 (9 лет назад)
Lenachelaznova
26 марта 2015 г., 2:32:20 (9 лет назад)
var
n:string;
t:char;
i,j,k:integer;
begin
write('Число: ');
readln(n);
k:=length(n);
for i:=1 to k do
for j:=i to k do
if ord(n[j])<ord(n[i]) then
begin
t:=n[i];
n[i]:=n[j];
n[j]:=t;
end;
writeln('Минимальное число: ',n);
end.
Ответить
Другие вопросы из категории
Програмирование в pascal, помогите, скиньте работающую программу. Дано четырёхзначное число. Найдите среднее арифметическое его средних цифр.
только пожалуйста без sum
Const m= 1000; var z:Array [1..m] of record x,y:real end; n,i,j: integer; r,k,c,d: real; begin write('Ââåäèòå êîëè÷åñòâî ñòàíöèé: '); Readln(n); for i:=1
to n do begin write('Ââåäèòå êîîðäèíàòû ',i,' ñòàíöèè (x y): '); Readln(z[i].x,z[i].y) end; r:=0; for i:=1 to n do for j:=i+1 to n do begin d:=(z[i].x+z[j].x)/n; c:=(z[i].y+z[j].y)/n; if d
Читайте также
Помогите пожалуйста решить 1) дано натуральное число. Определить номер цифры 3 в нем считая от конца числа. Если такой цифры нет то ответ
0,если их несколько то номер крайней правой.
2) Дано натуральное число. Определить сумму m его последних цифр
3)Дано натуральное число. определить его максимальную цифру.
4) дано предложение. заменить в нем все вхождения под строку str1 на подстроку str2
5) последовательность чисел Фибоначчи образуется так: первый и второй член последовательности равен 1, каждый следующий равен сумме двух предыдущих(1,1,2,3,5,,8,12..) Дано натуральное число n>=3 : а) найти k-й член последовательности б)получить первые n членов последовательности в)для заданного n определить верно ли,что сумма первых n членов есть четное число
1.Дано натуральное число:
a) найти произведение цифр числа б) верно ли, что в данном числе нет данной цифры А (цифру А вводить с клавиатуры)
2. Найти все трехзначные числа, которые при увеличении на 1 делятся на 2, при увеличении на 2 делятся на 3, при увеличении на 3 делятся на 4, а при увеличении на 4 делятся на 5.
3.Из данного натурального числа удалить все цифры А (а вводятся с клавиатуры).
Написать программы в паскале и желательно блок-схему, но можно и без нее.
Помогите пожалуйста)
Дано натуральных чисел n. в каждом числе Переставить цифры так, чтобы образовалось минимальное число, записанное теми же цифрами. Цифра "0" не может
быть первой в числе
1.дано натурально четырехзначное число. определить цифры этого числа (K,L.M.N) и выяснить можно ли построить ромб со сторонами K,L.M.N.в паскале АВС.
2.дано натурально число N вычислить куб суммы этого числа
1. Дано натуральное число n. Переставить его цифры так, чтобы образовалось максимальное число, записанное теми же цифрами.
2. Найти все двузначные числа, сумма квадратов которых делится на 17.
Всё это нужно сделать в программе Паскаль, но КАК?!
Вы находитесь на странице вопроса "1. Дано натуральное число n. Переставить его цифры так, чтобы образовалось минимальное число, записанное теми же цифрами.", категории "информатика". Данный вопрос относится к разделу "10-11" классов. Здесь вы сможете получить ответ, а также обсудить вопрос с посетителями сайта. Автоматический умный поиск поможет найти похожие вопросы в категории "информатика". Если ваш вопрос отличается или ответы не подходят, вы можете задать новый вопрос, воспользовавшись кнопкой в верхней части сайта.