Регистрация Спросить otvet5GPT
yaach1
09.05.2022 06:15
Информатика
Есть ответ 👍

Паскаль заполнить массив случайными числами и найти элемент наиболее близкий по значению к максимальному элементу.

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

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

555555Эвелина
555555Эвелина
4,4(23 оценок)
Const n = 100; var m: array [1..n] of integer; i,max,o: integer; begin randomize; o: =0; for i: =1 to n do begin m[i]: = random(1000); if m[i]> max then max: =m[i]; end; for i: =1 to n do begin write(m[i],' '); if (m[i]> o) and (m[i]< max) then o: =m[i]; end; writeln; writeln('--=',o,' =--'); readln; end.
ilaida1
ilaida1
4,5(100 оценок)
//это можно стереть. если в n есть 0 то тогда программа выведет no. program z1; var b,c,d,i,s,l: integer;     a: string; begin read(a); b: =length(a); s: =strtoint(a); c: =0; for i: =1 to b do  for i: =1 to b do  begin  d: =strtoint(a[i]);   if d=0 then l: =1;   end; if l=0 then begin                  for i: =1 to b do                      for i: =1 to b do                      begin                      d: =strtoint(a[i]);                       if (s mod d)=0 then c: =c+1;                       end;             end            else            write('no'); if (l=0) and (c=b) then write('t'); if (l=0) and (c< > b) then write('p'); end.

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

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

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

Caktus Image

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

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

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

  • Сколько это стоит?

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

  • Могу ли я использовать otvet5GPT в школе?

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

  • В чем отличия от ChatGPT?

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

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

GTP TOP NEWS