Найти минимальный элемент и проверить, являются ли все элементы массива различными - VB

Узнай цену своей работы

Формулировка задачи:

Создать одномерный массив и заполнить его случайными 10 числами в интервале от 0 до 30, найти минимальный элемент и проверить являются ли все элементы массива различными.

Решение задачи: «Найти минимальный элемент и проверить, являются ли все элементы массива различными»

textual
Листинг программы
For i = 1 To 9
For j = i + 1 To 10
 If a(i) = a(j) Then Print "одинаковые есть": Exit Sub
Next j
Next i
Print "нет одинаковых"
 
End Sub

ИИ поможет Вам:


  • решить любую задачу по программированию
  • объяснить код
  • расставить комментарии в коде
  • и т.д
Попробуйте бесплатно

Оцени полезность:

5   голосов , оценка 3.6 из 5
Похожие ответы