Массивы В1(10) и В2(10) заполнены случайными числами. Сформировать третий массив, каждый элемент которого равен большему из соответствующих
10-11 класс
|
элементов данного массива. Вывести три массива.
var b1,b2,b3:array[1..10] of integer;
i:integer;
begin
for i:=1 to 10 do begin
b1[i]:=random(-50,50);
b2[i]:=random(-50,50);
b3[i]:=max(b1[i],b2[i]);
end;
write('B1 Mass ');
for i:=1 to 10 do
write(b1[i]:3,' ');
writeln;
write('B2 Mass ');
for i:=1 to 10 do
write(b2[i]:3,' ');
writeln;
write('B3 Mass ');
for i:=1 to 10 do
write(b3[i]:3,' ');
end.
Другие вопросы из категории
равен сумме квадратов координат
этом все должны принимать участие в этом раунде. и так пока не пройдёт (n = 2*m) n - 1 раундов. Я потом этот алгоритм должен буду описать на Paskal.
Или доказать, что это невозможно
Читайте также
элементов данного массива. Вывести три массива.
сформулируйте массив содержащий 15 элементов, с помощью датчика случайных чисел. получите новый массив, каждый элемент которого равен квадрату соответствующего элемента исходного массива. в полученном массиве определите насколько максимальный элемент исходного массива отличается от минимального элемента нового массива. выведите на экран исходные и полученные результаты
соответствующего элемента исходного массива. в полученном массиве определите насколько максимальный элемент исходного массива отличается от минимального элемента нового массива. выведите на экран исходные и полученные результаты