Составить программу в Паскале.
Вам дано три числа a, b и c. Вы должны в таком порядке приписать эти числа друг к другу, чтобы в результате получилось минимальное число. Например, если a=12, b=5, c=3, приписыванием можно получить числа 1253, 1235, 3125, 3512, 5123, 5312. Минимальным среди этих чисел является 1235.

Var
  a: array[1..3] of string;
  i, j, k, min, x: integer;
begin 
for i := 1 to 3 do
  begin
    write(Введите ,i, число:);
    readln(a[i]);
  end;
x := StrToInt(a[1] + a[2] + a[3]); 
min := x;  for i := 1 to 3 do
for j := 1 to 3 do
      if j <> i then
        for k := 1 to 3 do
          if (j <> k) and (i <> k) then
          begin
            x := StrToInt(a[i] + a[j] + a[k]);
            if x < min then min := x;
          end;
writeln(min=, min)
end.

Если ответ по предмету Информатика отсутствует или он оказался неправильным, то попробуй воспользоваться поиском других ответов во всей базе сайта.