profile
Опубликовано 5 лет назад по предмету Информатика от serg6880

Массивы В1(10) и В2(10) заполнены случайными числами. Сформировать третий массив, каждый элемент которого равен большему из соответствующих элементов данного массива. Вывести три массива.

  1. Ответ
    Ответ дан PopCop312
    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.
Самые новые вопросы