Два массива a(14) и b(14). получить третий массив, перемножив элементы первого на элементы второго, взятые в обратном порядке. все массивы вывести на экран. напишите программу в free pascal.
254
466
Ответы на вопрос:
Const n=14; var a,b,c: array[1..n] of integer; i: byte; begin randomize; for i: =1 to n do begin; a[i]: =random(-10,10); b[i]: =random(-10,10); end; println (a); writeln; println (b); writeln; for i: =1 to n do begin; c[i]: =a[i]*b[n+1-i]; end; println (c); end. пример: 9 10 -10 6 3 -4 -3 6 4 -9 6 -9 2 -10 -3 -10 9 -4 8 -9 -6 -1 -9 6 6 -10 0 -9 -81 0 100 36 18 36 3 -36 -36 -72 -24 -81 -20 30
Популярно: Информатика
-
Dasha20082011.11.2020 04:05
-
dania783410.02.2021 16:25
-
kabdushevaaynash14.04.2020 12:00
-
Дашулька15050410.01.2020 04:47
-
kuvandykov0505.04.2021 10:50
-
SadPlayer00702.11.2021 19:37
-
bgs654410.05.2020 02:18
-
dreygar08.01.2021 05:26
-
mia7301.03.2023 14:51
-
Zazasalka17412.06.2020 10:30