Напишите программу, которая заполняет массив из n элементов случайными целыми числами в диапазоне [ a , b ] и определяет номера двух элементов этого массива, которые расположены ближе всех друг к другу на числовой оси. эти элементы не обязательно должны быть расположены рядом друг с другом. если таких пар несколько, нужно вывести номера элементов самой последней из таких найденных пар. входные данные входная строка содержит три числа: границы диапазона случайных чисел a и b , а также размер массива n . все числа разделены пробелами. гарантируется, что 0 < n ≤ 10000 .

298

483

Посмотреть ответы 2

Ответы на вопрос:

pitonpitonov

Информатика

4,4(23 оценок)

Const n = 50; // количество чиселvar k: array [1..n] of integer; i, j, n1, n2, minr, a, b: integer; begin writeln(n, ' ', ': d'); a : = random(1000); b : = random(1000); minr : = 10000; for i : = 1 to n do k[i] : = a + random(b); for i : = 1 to n do for j : = 1 to n do if ((abs(k[i] - k[j])) < minr) and (k[i] < > k[j]) then begin minr : = abs(k[i] - k[j]); n1 : = i; n2 : = j; end; writeln(n1, ' ', n2); end.

ляятупой

Информатика

4,7(30 оценок)

Var a,a1,a2,a3,a4: integer; begin writeln('a='); readln(a); a1: =a div 1000; a2: =a div 100 mod 10; a3: =a mod 100 div 10; a4: =a mod 10; writeln('цифры: ',a1: 2,a2: 2,a3: 2,a4: 2); if (a mod a1=0)and(a mod a2=0)and(a mod a3=0)and(a mod a4=0) then writeln('введенное число делится на все свои цифры') else writeln('введенное число не делится на все свои цифры'); end.

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.