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

Написать программу.Задать три массива размерностью 10 элементов каждый, задать произвольным способом значения для двух массивов. Элементам третьего массива присвоить произведение элементов первых двух. C[1]:=A[1]*B[1] C[2]:=A[2]*B[2] C[3]:=A[3]*B[3]

  1. Ответ
    Ответ дан Аккаунт удален

    PascalABC.NET 3.4.2, сборка 1884 от 24.11.2018

    Внимание! Если программа не работает, обновите версию!

    begin

     var a := ArrRandom(10, -50, 50);

     a.Println;

     var b := ArrRandom(10, -50, 50);

     b.Println;

     var c := a.Zip(b, (p, q)-> p * q).ToArray;

     c.Println

    end.

Самые новые вопросы