Дан целочисленный массив из 40 элементов элементы массива могут принимать целые значения от 0 до 10000 включительно позволяющий найти и вывести наименьший из элементов массива восьмиричная система
197
210
Ответы на вопрос:
Var i,max: integer; a: array[1..40]of integer; begin max: =-1; writeln('введите значения членов массива'); for i: =1 to 40 do begin readln(a[i]); if (a[i] mod 8 =7) and (a[i]> max) then max: =a[i]; end; if (max< > -1) then writeln('максимальное число: ',max) else writeln('чисел по заданному параметру нет'); end.
program pr; uses crt, graphabc; var driver,mode : integer; beginsetwindowwidth(1024); setwindowheight(600); setpencolor(clblack); rectangle(100,100,400,400); rectangle(150,150,200,300); rectangle(300,150,350,300); rectangle(375,99,340,10); line(100,100,250,10); line(250,10,400,100); circle(600,50,50); floodfill(600,50,clblue); circle(250,65,30); floodfill(250,65,clred); setpencolor(clblue); rectangle(225,150,275,300); line(250,150,250,300); line(175,150,175,300); line(325,150,325,300); setpencolor(clred); circle(600,300,25); circle(575,340,25); circle(625,340,25); circle(550,380,25); circle(600,380,25); circle(650,380,25); end.
незнаю подойдет рисунок или нет но делал сам
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
yegor65501.09.2020 03:08
-
baranovkirill31.08.2022 19:11
-
marinazajcik029.02.2020 08:19
-
WildOwlXD23.09.2022 11:54
-
ruslanka100030.03.2023 09:11
-
6996nya02.03.2020 20:31
-
yanashowsouany03.11.2020 01:14
-
natalikc13.06.2020 00:28
-
amid6903.04.2021 13:58
-
anastasiaselina21.06.2020 09:39
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.