Заданы массивы А и В из N чисел (N=10) случайным образом. Сформировать новый массив, каждый элемент которого равен минимальному из соответствующих элементов этих массивов
Заданы массивы А и В из N чисел (N=10) случайным образом. Сформировать новый массив, каждый элемент которого равен минимальному из соответствующих элементов этих массивов
Гость
Ответ(ы) на вопрос:
Гостьvar a:array[1..10] of integer;
b:array[1..10] of integer;
c:array[1..10] of integer;
i:integer;
begin
cls;
for i:=1 to 10 do
begin
a[i]:=random(50);
write(a[i]:4);
end;
writeln;
for i:=1 to 10 do
begin
b[i]:=random(50);
write(b[i]:4);
end;
writeln;
for i:=1 to 10 do
begin
if a[i]
Не нашли ответ?
Похожие вопросы