Вопрос задан 02.08.2018 в 13:10. Предмет Информатика. Спрашивает Янчинський Максим.

Помогите пожалуйста сделать Блок-Схему)) var N: integer; var ch: char; a: array [1..400] of

integer; i,max1,max2: integer; begin Randomize; Write('Введите размерность одномерного массива: '); Readln(N); Write('Ввести массив случайно? (y/n) '); readln(ch); if ch='y' then begin writeln('Исходный массив: '); for i:=1 to N do begin a[i]:= random(-100,100); //массиву задаются случайные значения write(a[i]:5); end; end else begin for i:=1 to N do begin readln(a[i]); end; end; writeln; max1:= a[1]; max2:=integer.MinValue; //стандартные значения for i:=2 to N do if a[i] > max1 then //если значение больше этого begin max2:= max1; //второе по велечине значение ровно max1 max1:= a[i]; //max1 принимает новое значение end else If (a[i] > max2) and (a[i] < max1) then max2:=a[i]; // иначе если значение больше второго по величине, оно станет вторым по велечине writeln('Второе по величине число: ',max2); write('Конечнный массив: '); for i:=1 to N do begin if i > max2 then a[i]:=max2; // если индекс больше второго по велечине значению, то значение ровно ему write(a[i]:5); end; Writeln; end.
0 0
Перейти к ответам

Ответы на вопрос

Внимание! Ответы на вопросы дают живые люди. Они могут содержать ошибочную информацию, заблуждения, а также ответы могут быть сгенерированы нейросетями. Будьте внимательны. Если вы уверены, что ответ неверный, нажмите кнопку "Пожаловаться" под ответом.
Отвечает Вей Даша.
1. Вычисляем дифференциал:
dy = 8x^3dx
2. y(x + dx) = y(x) + dy(x)
в данном случае х = 1, dx = 0.0058
3. Вычисляем значение функции:
y(1.0058) = 2 + 8*0.0058 = 2.046
(все равенства на самом деле приблизительные!! )
Успехов!
0 0
Отвечает нейросеть ChatGpt. Будьте внимательны, ответы нейросети могут содержать ошибочные или выдуманные данные.

Блок-схема для данного алгоритма может выглядеть следующим образом:

``` ┌───┐ ┌───┐ │ │ │ │ │ │ │ │ │ │ │ │ │ │ └───┘ │ │ ▲ └───┘ │ ▲ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ ▼ │ ┌───┐ ▼ │ │ ┌───┐ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ └───┘ └───┘ ▲ ▲ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ ▼ ▼ ┌───┐ ┌───┐ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ │ └───┘ └───┘ ```

0 0

Топ вопросов за вчера в категории Информатика

Последние заданные вопросы в категории Информатика

Задать вопрос