Question

Дан массив из 40 элементов. Каждый элемент может принимать целочисленные значения от 0 до 200. Напишите программу, которая позволит определить, все ли элементы массива различны. Программа должна вывести одно из сообщений «Есть одинаковые элемены» или «Все элементы различны».​

Answer 1

var a: array [0..39] of integer; i,b: integer;

begin

randomize;

for i:=0 to 39 do a[i]:=random(0,200);

b:=1;

for i:=0 to 39 do begin

if b=39 then begin writeln('Все элементы различны'); break end

else

if (a[i]<>a[b]) and (b<39) then b+=1

else begin writeln('Есть одинаковые элемены'); break end

end

end.

Answer 2

Вот пример программы на языке Python, которая проверяет, все ли элементы в массиве различны:

pythonCopy code
def check_array_uniqueness(array):
    if len(array) != len(set(array)):
        print("Есть одинаковые элементы")
    else:
        print("Все элементы различны")

# Пример массива
array = [1, 2, 3, 4, 5, 6, 7, 8, 9, 10,
         11, 12, 13, 14, 15, 16, 17, 18, 19, 20,
         21, 22, 23, 24, 25, 26, 27, 28, 29, 30,
         31, 32, 33, 34, 35, 36, 37, 38, 39, 40]

check_array_uniqueness(array)

Программа принимает массив и сравнивает его длину с длиной множества, созданного из массива. Если длины различаются, значит, в массиве есть повторяющиеся элементы, и программа выводит сообщение "Есть одинаковые элементы". В противном случае, если все элементы уникальны, программа выводит сообщение "Все элементы различны".