Программа ввода и вывода данных. возведение в квадрат кождого элемента массива. путём randomize. от 1 до 20
201
260
Ответы на вопрос:
Const n = 13; var a: array[1..n] of integer; i: integer; begin randomize; write('исходный массив: '); for i: = 1 to n do begin a[i]: =random(19)+1; write(' ',a[i]); end; writeln; write('каждый элемент возводится в квадрат: '); for i: = 1 to n do begin a[i]: =a[i]*a[i]; write(' ',a[i]) end end.
// pascalabc.net 3.3, сборка 1600 от 23.12.2017 // внимание! если программа не работает, обновите версию! begin var (n,m): =readinteger2('количество строк и столбцов в матрице: '); writeln('*** исходная матрица ***'); var a: =matrrandom(n,m,-99,99); a.println(4); writeln(4*a.colcount*'-'); var (q,k): =readinteger2('укажите номера строк q и k: '); assert((k< > q) and k.between(1,n) and q.between(1,n),'неверная пара (q,k)'); k-=1; q-=1; // перешли к индексам var rk: =a.row(k); if k< q then begin for var r: =k+1 to q do a.setrow(r-1,a.row(r)); a.setrow(q,rk) end else begin for var r: =k-1 downto q+1 do a.setrow(r+1,a.row(r)); a.setrow(q+1,rk) end; writeln('*** результат ***'); a.println(4) end. примеры количество строк и столбцов в матрице: 5 8 *** исходная матрица *** 32 -6 -66 81 84 0 50 -83 93 5 90 -33 88 30 -5 85 -46 35 -22 74 -66 8 -3 -86 -23 -81 -82 30 -1 -71 28 19 0 -95 -30 -46 -24 -77 38 49 укажите номера строк q и k: 4 1 *** результат *** 93 5 90 -33 88 30 -5 85 -46 35 -22 74 -66 8 -3 -86 -23 -81 -82 30 -1 -71 28 19 32 -6 -66 81 84 0 50 -83 0 -95 -30 -46 -24 -77 38 49 количество строк и столбцов в матрице: 4 3 *** исходная матрица *** -68 53 -35 -83 78 -78 99 -4 -9 -86 11 -30 укажите номера строк q и k: 2 4 *** результат *** -68 53 -35 -83 78 -78 -86 11 -30 99 -4 -9
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
Martishevska27.11.2022 09:25
-
nastya63201110.12.2021 10:00
-
никто27114.10.2021 22:02
-
звезда0ютуба06.04.2022 04:31
-
amaii25.10.2022 15:37
-
TAISKAKISKA19.06.2021 15:53
-
nyragka31.07.2020 05:09
-
Танюша270526.03.2023 19:57
-
sabekgnivslenti18.08.2020 20:47
-
cemikhadam05.10.2020 07:05
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.