Даны два массива: А(10) и В(10) образуйте массив С, состоящий из сумм соответствующих элементов массива А и В

@Игорь2196 · Регистрация: 22.01.2013

Студворк — интернет-сервис помощи студентам

@ermolay · 19.02.2013, 07:50

Pascal

const
  n=10;
type
  tAr=array[1..n] of integer;
var
  a,b,c: tAr;
  i: byte;
begin
  randomize;
  for i:=1 to n do
  begin
    a[i]:=random(9)+1;
    b[i]:=random(9)+1;
    c[i]:=a[i]+b[i];
  end;
  writeln('Массив A:');
  for i:=1 to n do write(a[i]:4);
  writeln;
  writeln('Массив B:');
  for i:=1 to n do write(b[i]:4);
  writeln;
  writeln('Массив C:');
  for i:=1 to n do write(c[i]:4);
  writeln;
  readln
end.

@Игорь2196 0 / 0 / 0 Регистрация: 22.01.2013 Сообщений: 38
		1
	Даны два массива: А(10) и В(10) образуйте массив С, состоящий из сумм соответствующих элементов массива А и В 19.02.2013, 01:55. Показов 4291. Ответов 1 Метки нет (Все метки) Даны два массива: А(10) и В(10) образуйте массив С, состоящий из сумм соответствующих элементов массива А и В 0

Опции темы

Даны два массива: А(10) и В(10) образуйте массив С, состоящий из сумм соответствующих элементов массива А и В

Решение