1-11 класс
  • 1-11 класс
  • 1 класс
  • 2 класс
  • 3 класс
  • 4 класс
  • 5 класс
  • 6 класс
  • 7 класс
  • 8 класс
  • 9 класс
  • 10 класс
  • 11 класс
Выберите класс
Предметы
(Сам и контр)
Задание 7 Вариант 3 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)
Босова, Босова, Аквилянов
11 класс
Автор
Босова, Босова, Аквилянов

Задание 7 Вариант 3 Самостоятельная работа 4 ГДЗ Рабочая тетрадь Босова 11 класс (Информатика)

Задача

С = {63, 7.2, -4.5, 0, -10, 14, -310, 50, 11, -14, 5}.
В заданном массиве С:
• наибольший элемент равен:……, его номер —……
• наименьший элемент равен:……, его номер —……
program s4_v3_7;
const
n = 11;
var
c: array[1..n] of real;
max, min: real;
i, imax, imin: integer;
begin
writeln(‘ввод массива’);
//randomize;
for i := 1 to n do
//c[i] := random*20-10;
readln(c[i]);
max := c[1]; imax := 1;
min := c[1]; imin := 1;
for i := 1 to n do
begin
if c[i] > max then
begin max := c[i]; imax := i end;
if c[i] < min then begin min := c[i]; imin := i end; end; c[imax] := min; c[imin] := max; writeln('max=', max, ' imax=', imin); writeln('min=', min, ' imin=', imax) end. • наибольший элемент равен: 63, его номер – 7; • наименьший элемент равен: -310, его номер – 1. В программе предусмотрен (в комментариях) ввод массива через генератор случайных чисел. Можно воспользоваться им, для этого убрать // и закомментировать ввод с клавиатуры. Для изменения количества элементов измените n.

Подробный ответ

В массиве $$C=\{63,\ 7{,}2,\ -4{,}5,\ 0,\ -10,\ 14,\ -310,\ 50,\ 11,\ -14,\ 5\}$$ находим наибольший и наименьший элементы:

  • наибольший элемент $$63$$, его номер $$1$$;
  • наименьший элемент $$-310$$, его номер $$7$$.

Затем меняем эти элементы местами.

program s4_v3_7;
const
  n = 11;
var
  c: array[1..n] of real;
  max, min: real;
  i, imax, imin: integer;
begin
  writeln(‘ввод массива’);
  for i := 1 to n do
    readln(c[i]);

  max := c[1]; imax := 1;
  min := c[1]; imin := 1;

  for i := 1 to n do
  begin
    if c[i] > max then
    begin
      max := c[i];
      imax := i;
    end;
    if c[i] < min then
    begin
      min := c[i];
      imin := i;
    end;
  end;

  c[imax] := min;
  c[imin] := max;

  writeln(‘max=’, max, ‘ imax=’, imax);
  writeln(‘min=’, min, ‘ imin=’, imin);
end.

После обмена получаем массив:

$$\{-310,\ 7{,}2,\ -4{,}5,\ 0,\ -10,\ 14,\ 63,\ 50,\ 11,\ -14,\ 5\}$$

Ответ

Наибольший элемент: $$63$$, номер $$1$$. Наименьший элемент: $$-310$$, номер $$7$$. После обмена: $$\{-310,\ 7{,}2,\ -4{,}5,\ 0,\ -10,\ 14,\ 63,\ 50,\ 11,\ -14,\ 5\}$$.



Общая оценка
4.3 / 5
Другие учебники
Другие предметы