Рекурсивные подпрограммы:

24. Составить программу вычисления суммы:

а) 1! + 2! + 3! + … + n! (n  15);

б) 2! + 4! + 6! + … + n! (n  16, n - четное).

Тип результата: Longint.

25. Составить программу нахождения числа, которое образуется из данного натурального числа при записи его цифр в обратном порядке. Например, для числа 1234 получаем 4321.

Тема 8: «Записи. Множества».

1. type

bts = set of 0..1;

var x:bts; y: set of (a,b,c);

z: set of ‘*’ . .’*’;

1. Каков базовый тип каждого из указанных множеств?

2. Сколько и какие значения может принимать каждая из переменных x,y,z?

2. Какие из следующих описаний верны, какие нет и почему?

Type p= set of real;

B = set of ‘a’ . . ‘z’;

C = set of integer;

2. Является ли множеством:

а) [9,6,3,0]; б) [2 . . 3,5,7]; в) [1 . . 15,4 . . 18]; г) [0 . .0]

2. Вычислить значения отношений:

а) [‘a’,’b’] = [‘b’,’a’] ; б) [2] <> [2,2,2] ;

в)66 = [66] ; г) [4,5,6] = [4 . . 6]; д)[‘c’,’d’] = [‘c’ . .’d’] ;

е) [2,3,5,7]<= [1 . . 9]; ж) [3,6 . . 8]<= [2 .. 7,9].

2. Вычислить значение выражения:

а) [1,3,5] - [2,4] ; ж) [2,4] + [1 . . 5];

б) [2,4] - [1 . . 5]; з) [ ] + [4];

в) [ ] - [4]; и) [1,3,5] * [2,4] ;

г) [1 . . 6] - [3. .8]; к) [1 . . 6] * [3..8];

д) [1,3,5] + [2,4] ; л) [2,4] * [1 . . 5];

е) [1 . . 6] + [3..8]; м) [ ] * [4].

2. Вычислить:

а) [2 . . 13 ] * [3,13 . . 60] + [4 . . 10 ] – [5 . . 15] * [6];

б) [2 . . 10] – [4,6] – [2 . . 12] * [8 . . 15]

2. Составить программу, задающую четыре числовых множества и демонстрирующую все операции над ними.

2. Переменной X присвоить множество всех целых чисел от 8 до 22, переменной Y присвоить множество всех простых чисел из этого диапазона, а Z присвоить множество всех составных чисел от 8 до 22.

2. Дан текст из цифр и строчных латинских букв. Определить, каких букв – гласных (a,e,i,o,u) или согласных больше в этом тексте.

2. Дана строка символов. Подсчитать общее количество цифр и знаков (+,-,*), входящих в эту строку.

2. Составить программу, печатающую в алфавитном порядке все элементы множества А типа set of ‘a’..’z’.

2. Дан текст на русском языке. В алфавитном порядке распечатать все строчные гласные и согласные буквы, входящие в этот текст.

2. Опишите комбинированный тип для определения следующего понятия:

а) Цена в рублях и копейках;

б) Время в часах, минутах и секундах;

в) Дата (число, меся, год);

г) Адрес (город, улица, дом, квартира);

д) Семинар (предмет, преподаватель, номер группы, день недели, часы занятия, аудитория);

е) Экзаменационная ведомость (предмет, номер группы, дата экзамена, фамилия студента, номер его зачётной книжки, экзаменационная оценка).

2. Даны две карты к1 и к2, проверить бьёт ли карта к1 карту к2.

2. Даны две карты к1 и к2 и козырная масть КМ. Проверить бьёт ли карта к1 карту к2 с учётом козырной масти.

2. Даны фамилии 10 учащихся, их пол, рост от 140 . . 200. Используя комбинированный тип запись определить средний рост женщин из этой группы и самого высокого мужчину из этой группы.

2. Дана ведомость 25 учащихся, состоящая из фамилий учащихся и оценок по экзаменам (русский язык, математика, физика, информатика). Вывести на экран имена тех учащихся, которые сдали все экзамены на «отлично».

2. Даны сведения о студентах (фамилия, имя, отчество, пол, год рождения). Вывести на экран фамилии каждого студента мужского пола, достигшего двадцатилетнего возраста.

2. Даны сведения о сдаче абитуриентами вступительных экзаменов (фамилия, имя, отчество, оценки по математике, информатике, обществознанию, иностранному языку (от 0 до 50 баллов по каждому предмету)). Вывести на экран фамилии абитуриентов, набравших суммарное количество баллов более 90 и сдавших информатику не менее, чем на 45 баллов

2. Дан список 20 работников (фамилия, пол и заработная плата от 100 до 500 у.е.). Определить и вывести на экран:

а) Среднюю заработную плату мужчин, фамилии мужчин, чья заработная плата выше средней;

б) Среднюю заработную плату женщин, фамилии женщин имеющих максимальную заработную плату.

2. Даны сведения о книгах (фамилия автора, название и год издания).

Вывести на экран:

а) название книг данного автора, изданных с 1977 года;

б) сведения о книгах с названием «Информатика».

2. Даны сведения об экспортируемых товарах (наименование товара, страна, импортирующая товар, страны, в которые экспортируется товар, объём поставляемой партии в штуках). Вывести на экран название стран с максимальным импортом товара.

2. Даны сведения об игрушках (название игрушки, её стоимость, возрастные границы детей, для которых игрушка предназначена).

Вывести на экран:

а) Название игрушек, которые подходят детям до 5 лет;

б) Цену самого дорогого конструктора;

в) Цены всех кубиков;

г) Цену самой дорогой и самой дешёвой игрушки.

2. Даны сведения о жителях, обслуживаемых данной поликлиникой (фамилия, имя, отчество жителя, адрес, место работы, наличие прививки от дифтерии, дату прохождения последней флюорографии). Вывести на экран:

а) Фамилия и адреса тех жильцов, которые не сделали прививку от дифтерии;

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

2. Даны сведения о машинах (модель, номер, цвет, фамилия владельца, дата последнего техосмотра). Вывести на экран:

а) Данные обо всех машинах не прошедших техосмотр в текущем году;

б) Фамилии обо всех владельцах «Волг» чёрного цвета;

в) По введённому с клавиатуры номеру машины вывести всю имеющую информацию о ней.