Паскаль!
Дан массив сформированный случайным образом составить программу которая выводит новый массив без повторяющегося заданного числа

Предыдущий
вопрос Следующий
вопрос

Вот пример программы на языке Паскаль, которая исключает заданное число из массива:

program RemoveNumFromArray;
const
n = 10; // Размер массива
numToRemove = 5; // Число, которое нужно удалить
var
arr: array[1..n] of Integer;
newArr: array[1..n] of Integer;
i, j, newSize: Integer;
begin
Randomize;
// Заполняем массив случайными числами
for i := 1 to n do
arr[i] := Random(10) + 1;
// Выводим исходный массив
writeln('Исходный массив:');
for i := 1 to n do
write(arr[i], ' ');
writeln;
// Формируем новый массив без повторяющегося числа
newSize := 0;
for i := 1 to n do
begin
if arr[i] <> numToRemove then
begin
newSize := newSize + 1;
newArr[newSize] := arr[i];
end;
end;
// Выводим новый массив
writeln('Новый массив без числа ', numToRemove, ':');
for i := 1 to newSize do
write(newArr[i], ' ');
readln;
end.

Эта программа создает массив из 10 элементов, заполненный случайными числами от 1 до 10. Затем программа удаляет заданное число (в данном случае число 5) из массива и выводит новый массив без этого числа.