Найти ошибку в коде( var i,max,min,imax,imin,sum,kol: longint; a: array [1..100000] of longint; begin i: =0; max: =0; min: =maxint; sum: =0; kol: =0; repeat i: =i+1; readln(a[i]); while a[i]< > 0 do begin if a[i] mod 2=0 then begin kol: =kol+1; sum: =sum+a[i]; if a[i]> max then begin max: =a[i]; imax: =i; end; if a[i] begin min: =a[i]; imin: =i; end; end; end; write('количество чисел: ',kol,',сумма чисел: ',sum,',максимальное из чисел: ',max,',номер максимального числа: ',imax,',минимальное из чисел',min,',номер минимального числа: ',imin); end.
197
385
Ответы на вопрос:
Var i,max,min,imax,imin,sum,kol: longint; a: array [1..1000] of longint; begin i: =1; readln(a[i]); max: =0; min: =maxint; sum: =0; kol: =0; while a[i]< > 0 do begin if a[i] mod 2=0 then begin kol: =kol+1; sum: =sum+a[i]; end; if a[i]> max then begin max: =a[i]; imax: =i; end; if a[i]< min then begin min: =a[i]; imin: =i; end; i: =i+1; readln(a[i]); end; writeln('количество чисел: ',kol,',сумма чисел: ',sum); writeln('максимальное из чисел: ',max,',номер максимального числа: ',imax); writeln('минимальное из чисел: ',min,',номер минимального числа: ',imin); end. пример: 15 27 94 60 51 0 количество чисел: 2,сумма чисел: 154максимальное из чисел: 94,номер максимального числа: 3минимальное из чисел: 15,номер минимального числа: 1
Const n = 20; var a : array [1..n] of integer; i, sum : integer; begin randomize; for i: = 1 to n do a[i]: = random(100); for i: = 1 to n do write(a[i],' '); writeln; sum: = 0; for i: = 1 to n do if i mod 2 = 1 then sum: = sum + sqr(a[i]); writeln(sum); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
kwjeps21.08.2020 01:58
-
FUNNIAO07.07.2021 00:30
-
Кпоперша104.06.2021 20:08
-
vgirenkov20.01.2021 13:09
-
wedh201127.12.2022 03:07
-
illusionion05.07.2021 17:06
-
yxhcycgc29.04.2022 20:29
-
bekkalvina240520.09.2022 18:35
-
bryuho2001109.08.2020 12:26
-
gmejenny10.03.2023 14:41
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.