Изменить порядок следования цифр в строке - Pascal

  1. Строка состоит только из цифр, нужно сделать(без перестановки) так, чтобы сначала шли двойки, потом нули, потом единицы Например строка 001212002 станет 222000011

textual

Код:

const a: String[3] = '201';
var s: String; i, j: Integer;
begin
  ReadLn(s);
  for i:=1 to Length(a) do for j:=1 to Length(s) do if a[i]=s[j] then Write(a[i]); WriteLn;
end.

Похожие ответы
  1. Помогите, пожалуйста, решить данную задачу в паскале: Дан текстовый файл, состоящий из нескольких строк. Изменить порядок следования строк в файле на обратный порядок следования.

  1. Вычислить сумму элементов массива, расположенных после последнего нулевого элемента,количество отрицательных элементов.Изменить порядок следования в массиве на обратный.Заранее благодарен.

  1. дано какое то число, например 123456, как сделать чтобы оно стало 654321?

  1. Дан одномерный массив. Изменить порядок следования массива на обратный. Помогите пожалуйста)


Нашли ошибку?
Развитие проекта
Яндекс.Метрика