Основы программирования: Сборник задач. Афанасьева Т.В - 9 стр.

UptoLike

9
1.В последовательности целых чисел определить количество
положительных чисел и количество элементов, значения ко-
торых находятся в интервале –10 до -20.
2.В последовательности целых чисел определить сумму по-
ложительных четных чисел.
3.В последовательности символов вывести на печать TRUE,
если количество гласных букв больше, чем согласных и
FALSE – иначе.
4.В последовательности целых положительных чисел опреде-
лить максимальное четное число и его порядковый номер.
5.В последовательности вещественных чисел определить
наименьшее отрицательное число и его порядковый номер.
6.В последовательности целых чисел определить третье по-
ложительное число и подсчитать количество цифр в нем.
7.В последовательности символов выдать на печать TRUE,
если значение последнего символа равно Ф.
8.В последовательности чисел выдать на печать TRUE, если
значение максимального числа больше числа 10.
9.В последовательности вещественных чисел подсчитать
произведение чисел, кратных 3.
10.В последовательности чисел сравнить, что больше сум-
ма положительных или произведение отрицательных.
11.В последовательности символов подсчитать количество
букв и количество цифр.
12.В последовательности чисел определить предпоследнее
отрицательное число.
13.Вычислить сумму ряда, общий член которого задан форму-
лой An=(x
n
)/n!.
14.При табулировании функции y=cos(x+a) на отрезке
[1,10] c шагом h определить сумму значений y, больших
значения Р.
4. ОПЕРАТОР ЦИКЛА С ПОСТУСЛОВИЕМ
* Задачи реализовать без использования массивов
Pascal.
Оператор цикла с постусловием предназначен для организации
циклических процессов.
Repeat <тело цикла> until <условие>;
здесь repeat,until-зарезервированные слова (повторять до тех
пор, пока не будет выполнено условие);
<тело цикла>-произвольная последовательность операторов
<условие>-выражение логического типа.