В
Все
У
Українська література
Г
Геометрия
Д
Другие предметы
Э
Экономика
Г
География
О
ОБЖ
М
Математика
М
МХК
Х
Химия
Қ
Қазақ тiлi
Л
Литература
У
Українська мова
О
Обществознание
Ф
Физика
А
Английский язык
А
Алгебра
И
История
Б
Беларуская мова
Б
Биология
М
Музыка
П
Право
И
Информатика
П
Психология
В
Видео-ответы
Н
Немецкий язык
Ф
Французский язык
О
Окружающий мир
Р
Русский язык
Dormin
Dormin
19.11.2022 15:51 •  Информатика

Составьте программу, выясняющую, все ли элементы двухмерного массива А(P,Q)
различны.
в паскале

Ответ:
2566409
2566409
03.09.2020 19:47

===== PascalABC.NET =====

begin

 var (p, q) := ReadInteger2('Введите p и q:');

 var a := MatrRandom(p, q, -99, 99);

 a.Println;

 if a.ElementsByRow.Distinct.Count = p * q then

   Print('Все элементы различны')

 else

   Print('Есть повторяющиеся элементы')

end.


Составьте программу, выясняющую, все ли элементы двухмерного массива А(P,Q) различны. в паскале
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?