Спасайте по паскалю в двухмерном массиве заменить элементы меньшие 3 их кубами.массив заполнить случайными числами в интервале от -3 до 10 вывести на экран исходный и полученный массив в виде таблицы : !
230
406
Ответы на вопрос:
Const n=5; m=6; var a: array[1..n,1..m]of integer; i,j: integer; begin for i: =1 to n do begin writeln; for j: =1 to m do begin a[i,j]: =random(14)-3; write(a[i,j]: 4); end; end; writeln('новый массив: '); for i: =1 to n do begin writeln; for j: =1 to m do begin if (a[i,j]< 3)and(a[i,j]< > 0) then if a[i,j]< 0 then a[i,j]: =-round(exp(ln(-a[i,j])*3)) else a[i,j]: =round(exp(ln(a[i,j])*3)); write(a[i,j]: 4); end; end; end.
Pascalabc.net const n=5; m=6; var a: array[1..n,1..m]of integer; i,j: integer; begin writeln('исходный массив: '); for i: =1 to n do begin for j: =1 to m do begin a[i,j]: =random(-3,10); write(a[i,j]: 5); end; writeln; end; writeln('измененный массив: '); for i: =1 to n do begin for j: =1 to m do begin if a[i,j]< 3 then a[i,j]: =trunc(power(a[i,j],3)); write(a[i,j]: 5); end; writeln; end; end.
Var a, b, c: integer; beginfor a: =1 to 3 do begin readln(b); if b mod 2 = 0 then c: =b+c; end; writeln('ответ: ',c); end.
Реши свою проблему, спроси otvet5GPT
-
Быстро
Мгновенный ответ на твой вопрос -
Точно
Бот обладает знаниями во всех сферах -
Бесплатно
Задай вопрос и получи ответ бесплатно
Популярно: Информатика
-
oljjjj104.05.2020 17:47
-
00001Wolf25.07.2021 06:07
-
XTreams25.09.2020 23:42
-
МаринаБалыгина50521231.03.2020 02:04
-
nikusha1010.06.2021 13:06
-
Aлинa1107.12.2020 23:30
-
1235568930.10.2021 10:58
-
лера223811.08.2021 21:15
-
zakir200714.10.2021 16:22
-
nadjanikiforovp0bx4024.05.2022 05:28
Есть вопросы?
-
Как otvet5GPT работает?
otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса. -
Сколько это стоит?
Проект находиться на стадии тестирования и все услуги бесплатны. -
Могу ли я использовать otvet5GPT в школе?
Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое! -
В чем отличия от ChatGPT?
otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.