Как продвинуть сайт на первые места?
Вы создали или только планируете создать свой сайт, но не знаете, как продвигать? Продвижение сайта – это не просто процесс, а целый комплекс мероприятий, направленных на увеличение его посещаемости и повышение его позиций в поисковых системах.

Ускорение продвижения
Если вам трудно попасть на первые места в поиске самостоятельно, попробуйте технологию Буст, она ускоряет продвижение в десятки раз, а первые результаты появляются уже в течение первых 7 дней. Если ни один запрос у вас не продвинется в Топ10 за месяц, то в SeoHammer за бустер вернут деньги.



Иллюстрированный самоучитель по Turbo Pascal для начинающих

Массивы

Приступая к решению задач этого раздела, следует вспомнить, что:

  • массив – это структура данных, представляющая собой совокупность элементов одного типа;
  • массив должен быть объявлен в разделе объявления переменных;
  • при объявлении массива удобно использовать именованные константы;
  • доступ к элементу массива осуществляется путем указания индекса (номера) элемента, в качестве которого можно использовать выражение целого типа, например, целую константу или переменную типа integer;
  • для ввода, вывода и обработки массивов удобно применять инструкции циклов (for, while, repeat).

153. Написать программу, которая вводит с клавиатуры одномерный массив из 5 целых чисел и выводит количество ненулевых элементов. Перед вводом каждого элемента на экране должна появляться подсказка с его номером.

После ввода каждого числа нажмите Enter
а[1] › 12
а[2] › 0
а[3] › 3
а[4] › -1
а[5] › 0
В массиве 3 ненулевых элемента.

154. Написать программу, которая выводит минимальный элемент введенного с клавиатуры массива целых чисел. Ниже представлен рекомендуемый вид экрана во время работы программы.

Поиск минимального элемента массива.
Введите в одной строке элементы массива (5 целых чисел) и нажмите Enter
 › 23 0 45-5 12
Минимальный элемент массива: -5.

155. Написать программу, которая вычисляет среднее арифметическое ненулевых элементов введенного с клавиатуры массива целых чисел. Ниже представлен рекомендуемый вид экрана во время работы программы.

Введите элементы массива (10 целых чисел) в одной строке и нажмите Enter.
 › 23 0 45-5 12 0-2 30 0 64
Сумма элементов массива: 184
Количество ненулевых элементов: 7
Среднее арифметическое ненулевых элементов: 23.86.

156. Написать программу, которая вычисляет среднюю (за неделю) температуру воздуха. Исходные данные должны вводиться во время работы программы. Рекомендуемый вид экрана во время работы программы приведен ниже.

Введите температуру воздуха за неделю.
Понедельник › 12
Вторник › 10
Среда › 16
Четверг › 18
Пятница › 17
Суббота › 16
Воскресенье › 14
Средняя температура за неделю: 14.71 град.

157. Написать программу, которая проверяет, находится ли в массиве введенное с клавиатуры число. Массив должен вводится во время работы программы.

158. Написать программу, которая проверяет, представляют ли элементы введенного с клавиатуры массива возрастающую последовательность.

159. Написать программу, которая проверяет, образуют ли элементы введенного с клавиатуры массива неубывающую последовательность.

160. Написать программу, которая вычисляет, сколько раз введенное с клавиатуры число встречается в массиве.

161. Написать программу, которая проверяет, есть ли во введенном с клавиатуры массиве элементы с одинаковым значением.

162. Написать программу, которая методом прямого выбора сортирует по убыванию введенный с клавиатуры одномерный массив.

Если Вы заметили ошибку, выделите, пожалуйста, необходимый текст и нажмите CTRL + Enter, чтобы сообщить об этом редактору.