В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
nightmarelucy
nightmarelucy
24.10.2021 09:33 •  Информатика

[pascal] написать программу: известен расход по n горючего в каждом из m автохозяйств. определите для каждого хозяйства вид горючего с наибольшим и с наименьшим расходом.

Показать ответ
Ответ:
АляМиткалова
АляМиткалова
31.08.2022 14:42

s := 0; (начальное значение счётчика)

 for i := 1 to 9 do  (цикл по i)

if A[i - 1] < A[i] then begin (если текущий элемент больше предыдущего,

 s := s + 1; то увеличиваем счётчик на 1)

     t := A[i]; (меняем текущий элемент местами с предыдущим)

     A[i] := A[i - 1];

     A[i - 1] := t

   end;

Последние три строчки перед end - обычный алгоритм обмена значениями между двумя переменными (t = a; a = b; b = t).

Итак, моделируем, что делает программа и считаем число обменов.

0) 6 9 7 2 1 5 0 3 4 8 - исходный массив

1) 6 9 7 2 1 5 0 3 4 8 -> 9 6 7 2 1 5 0 3 4 8 ОБМЕН

2) 9 6 7 2 1 5 0 3 4 8 -> 9 7 6 2 1 5 0 3 4 8 ОБМЕН

3) 9 7 6 2 1 5 0 3 4 8 ОК

4) 9 7 6 2 1 5 0 3 4 8 ОК

5) 9 7 6 2 1 5 0 3 4 8 -> 9 7 6 2 5 1 0 3 4 8 ОБМЕН

6) 9 7 6 2 5 1 0 3 4 8 ОК

7, 8, 9) Ноль будет "всплывать" в конец, 3 ОБМЕНА

Всего будет 6 обменов, s = 6.

ответ: 6

0,0(0 оценок)
Ответ:
1pashnett
1pashnett
14.10.2020 12:42

Собирается-журналист опрашивает людей для статьи

Обрабатывается-ученик решает задачу

Упрощается-учитель объясняет материал 

Создается-все тот же журналист придумывает статью

Запоминается-парнеь запоминает номер телефона девушки

Измеряется-программист рассчитывает сколько бит займет программа

Копируется-ученик списывает у одноклассника

Передается-две девушки обмениваются новостями

Принимается-ученики слушают учителя на уроке

Разрушается-придуманная выше указанным журналистом статья опровергается...

Делится на части-человек разбирает сообщение в котором пропущены пробелы

Ищется-человек ищет материал для доклада в интернете

0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота