Дано програму: var a: array [1..8] оf integer; m, k: integer; begin {…} m : = a[1]; for k : = 2 to 8 do if m < a[k] then m : = a[k]; {…} скільки разів буде виконаний оператор m : = a[k] для масиву (3, 8, 7, 9, 4, 10, 2, 12)? встановіть відповідність між операторами (1–4) та їх призначенням (а–г). 1 for i : = 1 to 10 do if a[i]< 0 then s : = s + a[i] 2 к : = 0; for i : = 1 to 10 do if a[i]< 0 then к : = к + 1 3 for i : = 1 to 10 do if a[i]< 0 then listbox1.items.add (inttostr( 4 for i : = 1 to 10 do if a[i]< 0 then а[i]: = 0 а знаходження суми від’ємних елементів масиву б виведення від’ємних елементів масиву у поле списку listbox1 в заміна нулями від’ємних елементів масиву г визначення кількості від’ємних елементів масиву встановіть відповідність між операторами (1–4) та їх призначенням (а–г). (кількість ів 2.00) 1 for i : = 1 to 10 do s : = s + a[i] 2 for i : = 1 to 10 do а[i] : = random(10)+5 3 var a: array[1..10] of real 4 for i : = 1 to 10 do а[i] : = а[i]*2 а подвоєння значень елементів масиву б заповнення масиву випадковими числами в діапазоні [5; 14] в знаходження суми елементів масиву г оголошення масиву 10 дійсних чисел які і належать до на змінювання значень елементів масиву? позначте всі правильні відповіді. а подвоєння значень елементів масиву б визначення найбільшого елемента масиву в заміна від’ємних елементів масиву нулем г знаходження суми додатних елементів масиву які і належать до на змінювання значень елементів масиву? позначте всі правильні відповіді. а подвоєння значень елементів масиву б визначення найбільшого елемента масиву в заміна від’ємних елементів масиву нулем г знаходження суми додатних елементів масиву дано масив: визначте результат виконання фрагмента програми: s : = 0; for i : = 1 to 5 do if a[i] < 6 then s : = s + a[i]; позначте одну правильну відповідь. а 17 б 29 в 8 г 14

Показать ответ

Ответ:

iruna4

11.10.2020 07:53

сервера и устройства при здании обычно используют глобальную беспроводную сеть. зависимости от предпочтений предпринимаделя или от преследованиякаких-то премуществ в банки могут использоваться такие разновидности проводных сетей: ячистая,звезда иерархическая звезда, шина, кольцевая. Большинство предпринимателей среднего бизнеса и заведующие банковскими институтами используют иерархическую сеть. она удобна тем что устройства зависят только от комунатора имеет меньше риска повреждения а вотличии от простой звезды иерархическая удобна если здание имеет очень много серверов и устройств их расспределяют группами это удобно если самой предпренимательстве идут деления что удобно поискам и сортировки серверов

так что я считаю банк имеет проводную локальную сеть виде иерархической звезды

0,0(0 оценок)

Ответ:

olga2610

14.04.2023 20:09

Пусть $l=x_0<x_1<\dots<x_n=b$ - какое-то разбиение отрезка [a, b]. Формулой левых прямоугольников называется приближение

$\displaystyle \int_a^b f(x)\,dx\approx\sum_{i=0}^{n-1} f(x_i)(x_{i+1}-x_i)$

Часто выбирают равномерное разбиение, в котором все точки расположены на одинаковом расстоянии h = (b - a) / n, при этом x_i=a+ih .

Реализация (PascalABC.NET): функция int_lr принимает подинтегральную функцию, левую и правую границы отрезка интегрирования и количество отрезков в разбиения. В основной программе интеграл вычисляется для n = 1, 2, 4, 8, ..., 1024, выводится n, результат численного интегрирования и разность между полученным значением и точным значением интеграла. Можно заметить, что при увеличении n в 2 раза ошибка уменьшается примерно в 2 раза.

function int_lr(f: real-> real; l, r: real; n: integer): real;

begin

var h := (r - l) / n;

var s := 0.To(n - 1).Select(i -> f(l + i * h)).Sum;

result := s * h;

end;

const exact = 1250 / 3;

begin

var n := 1;

for var _ := 1 to 11 do

begin

var int := int_lr(x -> (x - 5) ** 2 * (10 - x), 0, 10, n);