Дан массив А1(n,m) и массив А2(x,y). Найти сумму массивов А1 и А2. (На паскале )
Аноним:
(n, m) и (x, y) — размеры массивов?
Ответы
Ответ дал:
1
program ArraySum;
var
A1: array[1..4, 1..4] of integer = (
( 7, 12, 1, 14),
( 2, 13, 8, 11),
(16, 3, 10, 5),
( 9, 6, 15, 4)
);
A2: array[1..4, 1..4] of integer = (
(17, 4, 3, 14),
( 6, 12, 13, 9),
(10, 8, 9, 13),
( 5, 17, 16, 2)
);
sum: array[1..4, 1..4] of integer;
x, y: integer;
begin
for x := 1 to 4 do
for y := 1 to 4 do
sum[x, y] := A1[x, y] + A2[x, y];
for x := 1 to 4 do
begin
for y := 1 to 4 do
begin
write(sum[x, y]);
write(', ');
end;
writeln;
end;
end.
Вас заинтересует
1 год назад
1 год назад
1 год назад
1 год назад
6 лет назад
8 лет назад