Задать два массива (одномерных), заполненные соучайными целыми числами, состоящие из 10 элементов. затем вычислить элемент третьего массива, каждый из которых получается путём суммы соответствующих элементов первых двух массивов. вывести новый массив.

alenasweets230 alenasweets230    1   17.07.2019 03:30    0

Ответы
maks24719 maks24719  03.10.2020 06:07
Var
 a,b,c:array[1..10]of integer;
 i:integer;
  begin
   writeln('m 1:');
    for i:=1 to 10 do
     read(a[i]);
    writeln('m 2:');
      for i:=1 to 10 do
       begin
         read(b[i]);
         c[i]:=a[i]+b[i];
     end;
    writeln('m 3:');
    for i:=1 to 10 do
    write(c[i],' ');
    end.
ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика