Есть ответ 👍

Заполните массив случайными числами в интервале [0,1000] и выведите номера двух соседних элементов, произведение которых наибольшее.

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

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

barenzi
4,5(81 оценок)

Const n=10; var a: array[1..n]of integer; i,i_max: integer; max: real; p: real; begin randomize;         for i: =1 to n do             begin                   a[i]: =random(1001);                   write(a[i]: 4);             end; writeln; max: =a[1]*a[2];   i_max: =1;     for i: =2 to n-1 do         if a[i]*a[i+1]> max then               begin                   max: =a[i]*a[i+1];                   i_max: =i;               end; writeln(i_max,' ',i_max+1); end.

Program z1; var i, n, b: integer; begin writeln ('введите любое целое число'); read (n); for i: =1 to n*2 do if i mod 2=0 then b: =b+i; writeln (b); end.

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

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

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

Caktus Image

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

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

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

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

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

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

Подпишись на наш телеграмм канал

GTP TOP NEWS