Program HOC24;
var i,n,max,min: integer;
a: array[1..32000] of integer;
begin
write('Nhap so phan tu: '); readln(n);
for i:=1 to n do read(a[i]);
readln;
min:=a[1]; max:=a[1];
for i:=1 to n do
begin
if a[i]>max then max:=a[i];
if a[i]<min then min:=a[i];
end;
for i:=min to max do if i<>a[i] then write(i,' ');
readln
end.
Bạn cho ví dụ đi
Đề bài khó hiểu quá