Дан первый элемент массива С, вычисленный случайным образом. Сформировать массив С(N) в котором каждый последующий элемент массива меньше предыдущего на удвоенную размерность массива. Вывод ответа осуществить в столбец. 2) Дана таблица М(7, 7 Заполнить её случайными числами. Найти общее произведение элементов стоящих в строках под четными номерами в таблице М. Вывести на экран исходную таблицу М.

PascalABC.NET

Задание 1:

beginvar N := ReadInteger('N:');var C := ArrGen(n,Random(100),x->x-2*n); C.PrintLinesend.

Задание 2:

beginvar M := MatrRandom(7,7,1,9); M.Rows[1::2].Product(x->x.Product).Println; M.Printend.

Пример работы:

Исполнитель Калькулятор.1.Степень(число,степень)2.Корень(число,степень)3.Сложение(число,число2)4.Умножение(число,число2)5.Деление(число,число2)6.Вычитание(число,число2)7.Вывод(алг)-выводит результат алгоритма8.Если(условие)9.скобка1 скобка2-для содержания операторов в условииначало конец - для содержания всего алгоритма10.Ошибка - сообщает об ошибке и прекращает выполнение алгоритма11.Ввод(x)-считывает числа, введённые пользователем
Пример: Найти квадратный корень из числа 9
НачалоКорень(9,2)Вывод(алг)Конец
Пример: Разделить 7 на x
НачалоВвод(x);Если(x=0)скобка1Ошибкаскобка2Деление(7,x)Вывод(алг)Конец
Пример: Возвести х в степень у
НачалоВвод(х,у)Степень(х,у)Вывод(алг)Конец
Калькулятор находит сумму, разность, произведение, частное, возводит в степень или извлекает корень согласно введённым пользователем данным, либо заданным по умолчанию.

Исполнитель Калькулятор.
1.Степень(число,степень)
2.Корень(число,степень)
3.Сложение(число,число2)
4.Умножение(число,число2)
5.Деление(число,число2)
6.Вычитание(число,число2)
7.Вывод(алг)-выводит результат алгоритма
8.Если(условие)
9.скобка1 скобка2-для содержания операторов в условии
начало конец - для содержания всего алгоритма
10.Ошибка - сообщает об ошибке и прекращает выполнение алгоритма
11.Ввод(x)-считывает числа, введённые пользователем

Пример: Найти квадратный корень из числа 9

Начало
Корень(9,2)
Вывод(алг)
Конец

Пример: Разделить 7 на x

Начало
Ввод(x);
Если(x=0)
скобка1
Ошибка
скобка2
Деление(7,x)
Вывод(алг)
Конец

Пример: Возвести х в степень у

Начало
Ввод(х,у)
Степень(х,у)
Вывод(алг)
Конец

Калькулятор находит сумму, разность, произведение, частное, возводит в степень или извлекает корень согласно введённым пользователем данным, либо заданным по умолчанию.