упорядочения одномерного массива Паскаль

[Сергей11111]

Составьте алгоритм и программу к задаче:
Задача
Задано два неупорядоченные массива А(100) и В(100).Среди элементов каждого из них нету повторяемых.Создать новый массив С,который содержит элементы второго массива,которые не встречаются в первом массиве.Отсортировать массив С.Вывести два выходные массивы и созданный.

[Stilet]

Показывай код ввода исходных массивов

[Poma][a]

Я так понимаю, что

А(100)

гарантирует что будет введено ровно 100 элементов массива А ?

count := 1;
for i := 1 to 100 do begin
    flag := TRUE;
    for j := 1 to 100 do begin
        if b[i] = a[j] then
            flag := FALSE;
    if flag then begin
        c[count] := b[i];
        Inc (count)
    end
end;

Не проверял
Или так :

count := 1;
for i := 1 to 100 do begin
    j := 1;
    while (j <= 100) and (b[i] <> a[j]) do
        Inc (j);
    if j > 100 then begin
        c[count] := b[i];
        Inc (count)
    end
end;

Тоже не проверял

[Sciv]

гарантирует что будет введено ровно 100 элементов массива А ?

буэээ...

[Poma][a]

Значит просто указывает на максимальную размерность массива?