составить программу в Паскале. Дано трехзначное (пятизначное, десятизначное) число. Постройте новое число, состоящее из этих же цифр, расположенных в порядке возрастания, используя символьные переменные.
3 Информация - совокупность сведений, знаний о чем-либо; сообщение - совокупность знаков , отображающих информацию. 4 Кодирование - зашифровка информации (перевод языка на азбуку Морзе),декодирование - расшифровка( расшифровка сообщения с азбуки Морзе,к примеру, на русский язык). 5 Кол-во информации предотвращает неопределенность.Неопределенность информации характеризуется энтропией, хаосом. 6 Актуализация информации - совокупность действий по обновлению, расширению, восстановлению информации для эффективности ее использования. 7 Актуальность, полнота, доступность,понятность (т.е. понятна для восприятия)
pascal
Объяснение:
var
i, j ,k: integer;
l, lnew: string;
a: array of integer;
begin
Write('Введите число >> ');
ReadLn(l);
SetLength(a ,length(l));
for i := 0 to length(l) - 1 do
a[i] := strtoint(l[i + 1]);
for i := 0 to length(l) - 2 do
for j := i + 1 to length(l) - 1 do
if a[i] > a[j] then
begin
k := a[i];
a[i] := a[j];
a[j] := k;
end;
for i := 0 to length(l) - 1 do
lnew := lnew + inttostr(a[i]);
WriteLn('Новое число равно ', lnew);
end.