Два массива A и B заполнены случайными числами. Сформировать массив C, состоящий из суммы элементов двух первых массивов (например, C[1]=A[1]+B[1]…).
Решение:
|
1
2 3 4 5 6 7 8 9 10 11 12 13 14 15 16 17 18 19 20 21 22 23 24 25 |
program arrays_4;
uses crt; var n, i: integer; a, b, c: array[1..100] of integer; begin clrscr; randomize; write(‘Массив A: ‘); for i:=1 to 5 do begin a[i]:=random(10); write(a[i]:4); end; writeln; write(‘Массив B: ‘); for i:=1 to 5 do begin b[i]:=random(10); write(b[i]:4); c[i]:=a[i]+b[i]; end; writeln; write(‘Массив C: ‘); for i:=1 to 5 do write(c[i]:4); readkey; end. |