Написать программу.Задать три массива размерностью 10 элементов каждый, задать произвольным

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

Задать свой вопрос
Виталий Лугвенев
Язык программирования?
Шкорбатов Игорь
pascal
Мария Рончикова
Только не размерностью, а скорее все же размером. Размерность у их единица, т.н. массивы одномерные, если судить по приведенным формулам.
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)-gt; p * q).ToArray;

 c.Println

end.

, оставишь ответ?
Имя:*
E-Mail:


Добро пожаловать!

Для того чтобы стать полноценным пользователем нашего портала, вам необходимо пройти регистрацию.
Зарегистрироваться
Создайте собственную учетную запить!

Пройти регистрацию
Авторизоваться
Уже зарегистрированны? А ну-ка живо авторизуйтесь!

Войти на сайт