Дан одномерный массив из n элементов. Требуется найти максимальный элемент и отклонение от максимального для каждого из элементов.
Вывести на экран исходный массив, максимальный элемент и значения
отклонений для каждого элемента.
Например:
Исходный массив
358 12 45 2 -4
Max=45
Максимальный элемент
45
Список отклонений
42 40 37 33 043 49
Для нахождения максимального элемента необходимо определить
переменную, например, max, в которой будет храниться найденный
максимальный элемент. Присвоить ему значение первого элемента массива
Далее, сравнивая каждый элемент массива с переменной max определить: если
текущий элемент больше max, то max присвоить значение текущего элемента,
иначе, ничего не делать. Таким образом будет определен наибольший элемент(Java)

👇

Открыть все ответы

Ответ:

EpicKsushaGames

27.09.2022

Информационный поток - процесс передачи информации от одного объекта другому.При этом информация может видоизменяться, кодироваться, преобразововаться из одного вида сигналов в другие.Основные устройства компьютера - клавиатура, мышь, монитор, видео плата, процессор, ОЗУ, контроллеры, запоминающие устройства(накопители).Процессор это сердце компьютера, главный наблюдатель в процессе информационных потоков компьютера.При включении процессор инициирует процесс загрузки программ из накопителей в озу, он просит котроллеры чтобы поток данных загружался напрямую, по возможности, из накопителей в ОЗУ, минуя внутреннюю память процессора.Время от времени он опрашивает устройства ввода, мышь клавиатуру, на предмет сигналов, в которых закодированны нажатые кнопки, позиции курсора, итд... Если процессор зависнет, зациклится, то нажатия на кнопки не приведут ни к чему,т.к эти устройства никто не опрашивает.Программы, выполняющиеся на процессоре, могут "попросить" процессор выводить информацию на монитор, подавая комманды.Обрабатывая эти комманды процессор, отправляет данные в видео плату, или в котроллер видеоплаты.Видеоплата, получая данные из процессора в свой видео буфер, преобразует их в аналого-цифровой формат для подачи уже в монитор через кабель.

4,5(36 оценок)

Ответ:

grafinyasvarogoztpvz

27.09.2022

Const
a=5.1;
x=3.29;
var
Y,Z:double;
begin
Y:=2*exp(4*x)+arctan(x/a);
Z:=cos(x*sqr(x))+sqr(sin(x));
Writeln('Y=',Y,', Z=',Z)
end.

Результат выполнения программы:
Y=1038354.42291114, Z=-0.472433980670957

const
m=6;
n=8;
var
a:array[1..m,1..n] of double;
b:array[1..m*n] of double;
i,j,k,imax,imin:integer;
t:double;
begin
// Инициализация А и формирование В
Randomize;
Writeln('Исходный массив A');
k:=0;
for i:=1 to m do begin
    for j:=1 to n do begin
      a[i,j]:=10*Random-5; { случайное число на [-5;5] }
      Write(a[i,j]:8:4);
      t:=cos(a[i,j]);
      if (t>=0) and (t<0.5) then begin Inc(k); b[k]:=a[i,j] end
    end;
    Writeln
end;
// Вывод сформированного массива В
Writeln('Исходный массив В');
for i:=1 to k do Write(b[i]:8:4);
Writeln;
// Поиск максимума и минимума с последующим обменом их местами
imax:=1; imin:=1;
for i:=2 to k do
    if b[i]<b[imin] then imin:=i
    else
      if b[i]>b[imax] then imax:=i;
t:=b[imax]; b[imax]:=b[imin]; b[imin]:=t;
// Вывод результирующего массива В
Writeln('Результирующий массив В');
for i:=1 to k do Write(b[i]:8:4);
Writeln
end.

Тестовое решение:
Исходный массив A
-1.6788 -0.7273 -3.4919 2.9903 -4.3249 -2.2230 -2.1157 0.9685
2.0515 4.6821 0.2794 -1.4624 4.9668 -3.5754 -3.4115 -0.5592
3.0535 1.1339 0.0992 -0.5307 -0.6266 2.2623 1.9578 -1.3175
-0.6154 3.6080 2.4223 -4.8354 -2.2978 3.8982 -2.2427 2.0410
-1.1019 -3.4703 -2.0104 -1.3044 0.7744 0.6897 3.1747 1.3257
-4.3942 -1.6707 -3.2494 -0.6551 3.4726 -0.2896 3.4154 1.9644
Исходный массив В
-1.4624 4.9668 1.1339 -1.3175 -4.8354 -1.1019 -1.3044 1.3257
Результирующий массив В
-1.4624 -4.8354 1.1339 -1.3175 4.9668 -1.1019 -1.3044 1.3257

4,8(28 оценок)

Это интересно:

Транспорт

29.01.2023

Как найти верхнюю мертвую точку вашего двигателя (ВМТ)...

Образование-и-коммуникации

19.01.2021

5 простых способов запомнить математические и физические формулы...

Стиль-и-уход-за-собой

17.06.2020

Как сделать ретро шляпку с вуалью...

Компьютеры-и-электроника