Главная /
Программирование на Free Pascal и Lazarus /
Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Найти среднее арифметическое простых чисел в этой последовательности. Определение простого числа оформить в виде функц
Напишите программу, используя процедуры и функции. Поступает последовательность целых положительных чисел, 0 — конец последовательности. Найти среднее арифметическое простых чисел в этой последовательности. Определение простого числа оформить в виде функций.
вопросПравильный ответ:
Свой ответ
Сложность вопроса
66
Сложность курса: Программирование на Free Pascal и Lazarus
27
Оценить вопрос
Комментарии:
Аноним
Экзамен сдал на отлично. Спасибо за халяуву
09 авг 2016
Аноним
ответ подошёл
26 мар 2016
Другие ответы на вопросы из темы образование интуит.
- # Постройть график функции на интервале . Функция задана следующей зависимостью: f(x) = \begin{cases} x^{3}+3(x+2)^{2}, & \text{если } x \le 3 \\ \sqrt[{5}]{(\sin (10,5+x))^{2}}, & \text{если } x > 3 \end{cases}
- # Изобразите блок-схему решения задачи и напишите программу. Решите следующую задачу: Найти точки пересечения линии с осью абсцисс.
- # Изобразите блок-схему решения задачи и напишите программу. Решите следующую задачу: Вводится последовательность ненулевых чисел, 0 — конец последовательности. Определить, сколько раз последовательность поменяет знак.
- # Составьте две программы. Первая должна сформировать типизированный файл, вторая — считать данные из этого файла, выполнить соответствующие вычисления и записать их результаты в текстовый файл. Создать типизированный файл, куда записать целых чисел. Из исходного файла сформировать массив, в котором вначале расположить чётные, а затем нечётные числа. Определить номера наибольшего нечётного и наименьшего чётного компонентов.
- # Создать структуру с данными по таблице 8.8. Добавить и вычислить в структуре поле "Активность" по следующему принципу: если количество статей более 5, то в поле записать пробел, в противном случае — фразу "Работать лучше". Упорядочить записи по фамилии. Таблица должна содержать не менее десяти записей. Сведения о сотрудникеФамилияИнициалыУчёная степеньГод рожденияКоличество статейСергеевС. И.Доцент19717...