Заполнить два массива (из 10 элементов каждый) случайными числами. Сформировать третий массив, каждый элемент которого равен полусумме соответствующих элементов исходных массивов. Пример: Исходные массивы: 0 4 -3 2 -7 0 5 -6 ...

Заполнить два массива (из 10 элементов каждый) случайными числами. Сформировать третий массив, каждый элемент которого равен полусумме соответствующих элементов исходных массивов. Пример: Исходные массивы: 0 4 -3 2 -7 0 5 -6 3 1 5 2 0 -4 3 8 -3 8 -9 5 Конечный массив: 2.5 3 -1.5 -1 -2 4 1 1 -3 3 В паскале
Гость
Ответ(ы) на вопрос:
Гость
const   n=10; var   i:integer;   a,b:array[1..n] of integer;   c:array[1..n] of real; begin   Randomize;   for i:=1 to n do begin     a[i]:=Random(20);     Write(a[i]:5);     b[i]:=Random(20);     c[i]:=(a[i]+b[i])/2     end;   Writeln;   for i:=1 to n do Write(b[i]:5);   Writeln;   for i:=1 to n do Write(c[i]:5:1);   Writeln end. Пример    12   15    9   18   13   10    6   15    4   11     3   16    3    0   17    0   19   12    0    5   7.5 15.5  6.0  9.0 15.0  5.0 12.5 13.5  2.0  8.0
Не нашли ответ?
Ответить на вопрос
Похожие вопросы