Необходимо получить третий массив, из имеющихся двух массивов а(14) и b(14). посредством перемножения элементов первого массива на элементы второго, взятых в обратном порядке. написать программу в freepascal. все массивы вывести на экран.

221

324

Посмотреть ответы 3

Ответы на вопрос:

каралина123

Информатика

4,6(66 оценок)

Const n=10; var a,b,c: array[1..n] of integer; i: integer; begin randomize; writeln('a: '); for i: =1 to n do begin a[i]: =random(21); write(a[i]: 4); end; writeln; writeln('b: '); for i: =1 to n do begin b[i]: =random(21); write(b[i]: 4); end; writeln; for i: =1 to n do c[i]: =a[i]*b[n-i+1]; writeln('c: '); for i: =1 to n do write(c[i]: 4); writeln; end. пример: a: 20 10 18 11 5 9 0 9 10 8 b: 12 7 20 15 8 19 6 16 1 2 c: 40 10 288 66 95 72 0 180 70 96

video252

Информатика

4,4(54 оценок)

Вот код, написанный в среде pascalabc.net 3.2 и проверенный в среде free pascal (fpc): const n=14; var a,b,c: array[1..n] of integer; i: integer; begin randomize; for i: =1 to n do begin a[i]: =random(199)-99; // [-99; 99] write(a[i],' '); b[i]: =random(199)-99; // [-99; 99] end; writeln; for i: =1 to n do write(b[i],' '); writeln; for i: =1 to n do begin c[i]: =a[i]*b[n+1-i]; write(c[i],' ') end; writeln end. пример 70 92 -92 19 -33 8 10 -37 -87 51 -29 -4 -3 25 20 -69 7 -36 -91 -74 -38 -16 49 -46 93 0 -73 40 2800 -6716 0 1767 1518 392 -160 1406 6438 -4641 1044 -28 207 500 в качестве бонуса и вопроса "в воздух" - та же самая программа, написанная с учетом современных возможностей pascalabc.net 3.2 begin var a: =arrrandom(14,-99,99); a.println; var b: =arrrandom(14,-99,99); b.println; var c: =a.zip(b.reverse,(x,y)-> x*y).toarray; c.println end. и обещанный вопрос: если паскаль, как система программирования, в настоящее время используется только в целях обучения (следовательно, критерий "fpc шире распространен" отпадает), то зачем учиться на давным-давно устаревшей версии? чтобы писать было сложнее, больше и допускать при этом больше ошибок?

лизалол

Информатика

4,4(3 оценок)

.........................

Реши свою проблему, спроси otvet5GPT

Быстро
Мгновенный ответ на твой вопрос
Точно
Бот обладает знаниями во всех сферах
Бесплатно
Задай вопрос и получи ответ бесплатно

Задай свой вопрос

Популярно: Информатика

Есть вопросы?

Как otvet5GPT работает?

otvet5GPT использует большую языковую модель вместе с базой данных GPT для обеспечения высококачественных образовательных результатов. otvet5GPT действует как доступный академический ресурс вне класса.
Сколько это стоит?

Проект находиться на стадии тестирования и все услуги бесплатны.
Могу ли я использовать otvet5GPT в школе?

Конечно! Нейросеть может помочь вам делать конспекты лекций, придумывать идеи в классе и многое другое!
В чем отличия от ChatGPT?

otvet5GPT черпает академические источники из собственной базы данных и предназначен специально для студентов. otvet5GPT также адаптируется к вашему стилю письма, предоставляя ряд образовательных инструментов, предназначенных для улучшения обучения.