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

@Nastyshka · Регистрация: 30.01.2013

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

Помогите,пожалуйста,решить!Очень нужно!
Пожалуйста!

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

@Germanant · 30.01.2013, 21:42

Pascal

 program L1;
uses crt;
var A,B,C:array [1..100]of integer;
i,n:integer;
procedure InitMM(k:integer);
begin
for i:=1 to k do
 begin
  a[i]:=random(60)-10;
  b[i]:=random(50)-8;
 end;
end;
 
begin
readln(n);
InitMM(n);
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
if a[i]>b[i] then c[i]:=a[i] else c[i]:=b[i];
for i:=1 to n do
write(c[i]:4);
writeln;
readln;
end.

@Nastyshka · 30.01.2013, 21:43 **[ТС]**

огромнейшее спасибо!!!

Комментарий модератора

Если какой-либо пост на форуме показался вам полезным, нажмите кнопку "Спасибо" внизу самого поста

@Nastyshka 0 / 0 / 0 Регистрация: 30.01.2013 Сообщений: 6
		1
	Получить третий массив той же размерности, каждый элемент которого равен большему из соответствующих элементов данного массива. 30.01.2013, 21:30. Показов 2087. Ответов 2 Метки нет (Все метки) Помогите,пожалуйста,решить!Очень нужно! Пожалуйста! Даны два целочисленных массива, состоящих из одинакового числа элементов. Получить третий массив той же размерности, каждый элемент которого равен большему из соответствующих элементов данного массива. 0

	30.01.2013, 21:43

Опции темы

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

Решение