Вариант 13 Задача 1
type reals = file of real; Описать процедуру p(f,g,h) от трех файлов типа reals, которая переписывает из файла f в непустой файл g все элементы, меньшие среднего арифметического всех элементов файла f, и в непустой файл h записывает все остальные числа. Указание: введите файл f (последний элемент = 0). Выполните процедуру p(f,g,h). Распечатайте файлы g и h.
Задача 2
Напишите рекурсивную программу для вычисления суммы n i 2 1 (i 1) * i * (i 1) = + − ∑ . Указание: Пусть функция f(k) вычисляет сумму a[1]+a[2]+…a[k]. Нам надо вычислить f(n). Определим f(k) рекурсивно: 1) если k=1, то f(k)=a[1]; 2) если k>1, то значение функции равно сумме a[k] и f(k–1).
Прикрепленные файлы: |
|
|---|---|
|
Администрация сайта не рекомендует использовать бесплатные работы для сдачи преподавателю. Эти работы могут не пройти проверку на уникальность. Узнайте стоимость уникальной работы, заполните форму ниже: Узнать стоимость |
|
Скачать файлы: |
|
|
|
