22. Дано натуральное число n. Выяснить, сколько положительных элементов содержит массив A[1..n, 1..n], если aij = sin(i+j/2).
23. Дан целочисленный массив А[1..4, 1..5]. Найти среднее арифметическое каждого из столбцов.
24. Дан действительный массив размерностью n*m, в которой не все элементы равны нулю. Получить новый массив путем деления всех элементов данного массива на ее больший по модулю элемент.
25. Дан целочисленный массив А[1..4, 1..5]. Требуется преобразовать матрицу: поэлементно вычесть последнюю строку из всех строк, кроме последней.
26. Составьте программу упорядочения по возрастанию элементов каждой строки двумерного массива C.
27. Составьте программу, упорядочивающую по убыванию элементы каждой строки матрицы размером m*n.
28. Дан целочисленный массив А[1..4, 1..5]. Определить номера тех строк массива, в которых есть хотя бы один элемент, равный 10.
29. Составьте программу, упорядочивающую по возрастанию элементы каждого столбца матрицы размером m*n.
30. Задан массив А[1..5,1..5]. Получить из него новый массив путем деления элементов каждой из строк первого массива на элемент этой строки, стоящий по левой диагонали.
Процедуры и функции
1. Напишите программу, состоящую из трех процедур и основной программы. Первая процедура организует ввод двух целых чисел X и Y, вторая проверяет их сумму, третья выводи результат. Используйте эти процедуры в основной программе. Используйте X и Y как глобальные переменные.
2. Напишите программу вычисления площади поверхности и длины экватора на основе известного радиуса планет солнечной системы. Форму планет будем считать шаром. Вычисление площади поверхности и длины экватора оформите отдельными функциями.
3. Напишите программу поиска большего из четырех чисел с использованием подпрограммы поиска большего из двух чисел.
4. Даны координаты вершин многоугольника (x1, y1,x2,y2,…x10,y10). Напишите программу для вычисления его периметра (вычисление расстояния между вершинами оформить подпрограммой).
5. Напишите программу вычисления суммы: 1! + 2! + 3! + … + n!, используя функцию вычисления факториала числа k.
6. Напишите программу для вычисления числа сочетаний из N по M. Число сочетаний определяется по формуле N!/(M!*(N-M)!, где N – количество элементов перебора. Используйте подпрограмму вычисления факториала.
7. Напишите программу для определения НОД трех натуральных чисел.
8. Даны действительные числа s,t. Составить программу вычисления выражения f(t, -2s, 1.17) + f(2.2, t, s-t), где f(a,b,c) = (2a – b – sin(c)) / (5 + |c|).
9. Даны натуральные m и n (m<n). Составить программу, сокращающую дробь m/n.
10. Напишите программу вычисления суммы квадратов простых чисел, лежащих в интервале (M,N).
11. Напишите программу подсчета числа четных цифр, используемых в записи N-значного числа M.
12. Составьте программу вычисления суммы трехзначных чисел, в десятичной записи которых нет четных цифр.
13. Составьте программу вывода на экран всех натуральных чисел, не превосходящих N и делящихся на каждую из своих цифр.
14. Составьте программу нахождения наименьшего натурального N-значного числа X (X>=10), равного утроенному произведению своих цифр.
15. Составьте программу подсчета числа всех натуральных чисел, меньших М, квадрат суммы цифр которых равен X.
Символьные переменные
1. Напишите программу, подсчитывающую количество букв во введенном с клавиатуры слове. Ввод осуществляйте в цикле while do. Выход из программы – строка «999».
2. Дано натуральное число n и символы s1, s2, …, sn. Подсчитать сколько раз среди данных символов встречается символ +.
3. Дано натуральное число n и символы s1, s2, …, sn. Подсчитать количество встречающихся символов *.
4. Дано натуральное число n и символы s1, s2, …, sn. Выяснить, каких символов больше + или *.
5. Напишите программу, которая вводит строку и выводит ее, сокращая каждый раз на 1 символ до тех пор, пока в строке не останется 1 символ.
6. Напишите программу, определяющую число слов в строке. Одно слово от другого отделяется одним пробелом.
7. Напишите программу, которая подсчитывает стоимость телеграммы, текст которой вводится с клавиатуры.
8. Напишите программу, определяющую, какая из букв первая или последняя встречаются в заданном слове чаще.
9. Задано существительное первого склонения, оканчивающееся на букву «а». Напечатайте это слово во всех падежах.
10. Напишите программу, определяющую, сколько букв «о» стоит в заданном слове на четных местах.
11. Заданы фамилия, имя и отчество учащегося, разделенные пробелами. Напишите программу, печатающую фамилию ученика и его инициалы.
12. Напишите программу, удаляющую из слова i-ю букву.
13. Напишите программу, удаляющую из текста все буквы, совпадающие с его последней буквой.
14. Напишите программу, удаляющую из слова X все буквы, которые встречаются в слове Z.
15. Напишите программу, подсчитывающую количество различных букв в заданном слове.
16. Напишите программу, удаляющую из слова каждую третью букву.
17. Напишите программу, которая в заданном тексте меняет слово «Петр» на слово «Иван».
18. Напишите программу, которая удаляет из введенной строки любой требуемый введенный с клавиатуры символ. Процесс удаления выделите в отдельную процедуру.
19. В заданном тексте заменить все буквы "а" на букву "о".
20. Составить программу, которая обращает введенное слово, т.е. переставляет символы в обратном порядке.
21. Составить программу, определяющую, является ли введенное слово перевертышем.
22. Напишите программу, сортирующую символы введенной с клавиатуры строки в порядке возрастания их номеров в ASCII-таблице.
23. Напишите программу, вычисляющую длину самого короткого слова в предложении из трех слов, разделенных пробелами.
24. Составить программу, которая выводит на экран бегущую строку.
25. Составить программу, удаляющую в строке все, что заключено между фигурными скобками и их самих.
Список используемых источников
1. Рапаков Г.Г., Ржеуцкая С.Ю. Turbo Pascal для студентов и школьников. - СПб.:БХВ -Петербург, 2005. - 352 с.:ил.
2. Павловская Т.А. Паскаль. Программирование на языке высокого уровня: Учебник для вузов. - СПб.:Питер,2003. -393 с.
3. Павловская Т.А. Паскаль. Программирование на языке высокого уровня: Практикум. - СПб.:Питер,2006. -317 с.:ил.
4. Фаронов В.В. Delphi. Программирование на языке высокого уровня: Учебник для вузов. - СПб.: Питер, 2003.-640 с.