Вариант 11 Задача 1
type seria = file of integer; var s:seria; Описать функцию poz(s), подсчитывающую количество положительных чисел в файле s. Указание: введите файл s (последний элемент равен 0) и напечатайте значение функции poz(s).
Задача 2
Напишите рекурсивную программу для вычисления суммы n 2 i 1 1/(i) = ∑ . Указания. Пусть функция 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).
Прикрепленные файлы: |
|
|---|---|
|
Администрация сайта не рекомендует использовать бесплатные работы для сдачи преподавателю. Эти работы могут не пройти проверку на уникальность. Узнайте стоимость уникальной работы, заполните форму ниже: Узнать стоимость |
|
Скачать файлы: |
|
|
|