Ответы на вопрос:
Var a: array[1..20] of integer; i,k: integer; begin for i: =1 to 20 do begin read(a[i]); if not odd(a[i]) then k+=1; end; writeln(k); end.
Const n=20; var a: array [0..n-1,0..n-1] of integer; i, j: integer; begin for i : = 0 to n-1 do for j : = 0 to n-1 do read(a[i,j]); for i : = 0 to n-1 do begin for j : = 0 to n-1 do write(a[i,j],' '); writeln; end; i: =0; j: =0; while (i< n-1)and(a[i,j]=a[j,i]) do begin i: =i+1; j: =0; while (j< i)and(a[i,j]=a[j,i]) do j: =j+1; end; if a[i,j]=a[j,i] then writeln('yes') else writeln('no'); end. пример (для n=5): 1 2 3 4 5 2 8 7 9 0 3 7 4 3 1 4 9 3 2 6 5 0 1 6 8 yes
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
милана71716.05.2020 03:50
-
voloseikotatian19.09.2020 22:14
-
averinatatka25.03.2020 14:39
-
Mrsir204.12.2021 13:37
-
7rus79011.02.2022 04:11
-
BEAR5824.06.2022 01:00
-
GrinnySmith02.06.2022 14:32
-
Влад111111111111112112.05.2020 16:05
-
Аліна20221.05.2020 16:31
-
аааликкк27.12.2022 03:04
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.