Постановка задачи
Составить программу и блок-схему для
решения каждой из следующих задач:
1.
Сформировать файл f
целых чисел. Все отрицательные
числа из файла f
переписать в файл g.
2.
type FR = file of Real;
Описать функцию predp(f),
значением которой является предпоследний
элеиент файла f,
имеющего тип FR и содержащего
не менее двух элементов.
3.
type ryad = file of 1..maxint;
Описать процедуру fib(f,
n), записывающую
в ряд f все числа
Фибоначчи (1, 1, 2, 3, 5, …), не превосходящие
целого положительного числа n.
СРС(3 часа)
Дополнительное задание
1.
type Seria
= File of real;
Описать функцию otric
(s), подсчитывающую
сумму отрицательных элементов серии
s.
2.
type text = file of char;
Описать процедуру next
(t), заменяющую
в тексте t каждую цифру
на следующую по величине цифру (‘9’
заменять на ‘0’).
31
