Даны 2 массива. Получить 3 массив, каждый элемент которого равен сумме соотвестветствующих элементов исходных

@Divin · Регистрация: 05.05.2010

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

2) Даны 2 одномерных массива одинаковой длины.Получить 3 массива такой же размерности,каждый элемент которого равен сумме соотвеств. элементов данных массивов умноженной на больший из них

Огромная просьба помочь=)

@Sanyco-007 · 07.05.2010, 23:16

Pascal

program v2;
var x,y,z:array [1..100] of integer;
    i,n:integer;
begin
 write('Kolichestvo elementov masivov N: ');
 readln(n);
 writeln('Vvod masiva X:');
 for i:=1 to n do begin
  write('Element X[',i,']: ');
  readln(x[i]);
 end;
 writeln('Vvod masiva Y:');
 for i:=1 to n do begin
  write('Element Y[',i,']: ');
  readln(y[i]);
 end;
 for i:=1 to n do begin
  z[i]:=x[i]+y[i];
  if x[i]>y[i] then z[i]:=z[i]*x[i]
   else z[i]:=z[i]*y[i];
 end;
 writeln('Masiv Z:');
 for i:=1 to n do write(z[i]:10);
 readln;
end.

@Divin 0 / 0 / 0 Регистрация: 05.05.2010 Сообщений: 24
		1
	Даны 2 массива. Получить 3 массив, каждый элемент которого равен сумме соотвестветствующих элементов исходных 07.05.2010, 20:17. Показов 6401. Ответов 1 Метки нет (Все метки) 2) Даны 2 одномерных массива одинаковой длины.Получить 3 массива такой же размерности,каждый элемент которого равен сумме соотвеств. элементов данных массивов умноженной на больший из них Огромная просьба помочь=) 0

Опции темы

Даны 2 массива. Получить 3 массив, каждый элемент которого равен сумме соотвестветствующих элементов исходных

Решение