Ответы на вопрос:
Var min,max,i,s,n: integer; begin randomize; write('введите диапазон: '); readln(min,max); if(min> max) then begin max: =max+min; min: =max-min; max: =max-min; end; write('введите количество чисел: '); readln(n); for i: =1 to n do begin n: = min + random(max-min); write(i,'-е число: ', n); if((n> 6) and (not odd( then begin s: =s+n; writeln(' (четное и > 6, сумма равна: ', s,')') end else begin write(' (не четное'); if(n> 6) then writeln(', но > 6)') else writeln(' и < 6)'); end; end; write('сумма четных чисел > 6 равна: ',s); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
вап2722.01.2022 15:03
-
адекс315.01.2020 05:25
-
аннушка293526.06.2020 08:12
-
ДарьяМайер555416.08.2022 10:13
-
Aleksiy6902.08.2021 15:04
-
ivanapushkin1018.03.2020 07:27
-
ира101405.05.2020 11:39
-
egoregorcherk12.06.2021 18:59
-
271020001312.12.2021 01:05
-
никт1109.08.2021 02:04
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.