TURBO PASCAL

Новости

Программы   

Turbo Pascal 

Игры

Документация   

Странности

FAQ

Ссылки

Форум

Гостевая книга

Рассылка

Благодарности

Об авторе

 

 

[ следующий ] [ начало главы ] [ предыдущий ] [ содержание ]

Задачи для самостоятельного решения

6.1. [Pascal  Дана матрица  A(N, N) . Переменной  В  присвойте значение, равное количеству строк матрицы А, содержащих хотя бы одну нулевую компоненту.

6.2. [Pascal | Дана матрица  B(N, N) . Получите вектор  A(N) , компоненты которого находятся по правилу:   Ai  равно первому по порядку положительному элементу в  i-ой строке матрицы (если таких элементов в строке нет, то примите  Ai = –1).

6.3. [Pascal   Дана матрица  B(N, N). Получите вектор  A(N), компоненты которого находятся по правилу:  Ai равно количеству отрицательных чисел, с которых начинается i-ая строка.

6.4. [Pascal |  Среди строк заданной целочисленной матрицы, содержащих только нечётные элементы, найдите строку с максимальной суммой модулей элементов.

6.5. [Pascal   Среди столбцов заданной целочисленной матрицы, содержащих только такие элементы, которые по модулю не больше 10, найдите столбец с минимальным произведением элементов.

6.6. [Pascal ]  Задано два множества точек на плоскости. В первом множестве найдите хотя бы одну точку, сумма расстояний от которой до точек второго множества превышала бы заданную величину.

6.7. [Pascal  В заданной матрице  A(N, M)  найдите количество строк, не содержащих отрицательных чисел.

6.8. [Pascal   Дана целочисленная матрица  А(N, N) . Сформируйте результирующий вектор  B , элементами которого являются суммы элементов только тех строк матрицы  А , которые начинаются с  К  положительных чисел подряд.

6.9. [Pascal   Подсчитайте количество столбцов заданной целочисленной матрицы  A(N, N) , в которых имеются взаимнопротивоположные соседние числа.

6.10. [Pascal | Дана матрица  A(N, M) . Постройте вектор  B(N) , элементы  Bi  которого равны единице, если элементы  i-ой строки образуют упорядоченную по убыванию или по возрастанию последовательность, и нулю во всех остальных случаях.

6.11. [Pascal  Определите, сколько строк заданной матрицы  A(N, M)  содержат хотя бы один элемент из заданного числового диапазона.

6.12. [Pascal   Найдите номера строк заданной целочисленной матрицы  A(N, M) , в которых:
   а) на всех нечётных позициях стоят нули;
   б) на нечетных позициях встречаются нули.

6.13. [Pascal   Найдите номера столбцов заданной целочисленной матрицы  A(N, M),  которые составлены из попарно различных чисел, и подсчитайте количество таких столбцов.

6.14. [Pascal |  Подсчитайте количество различных (не повторяющихся) чисел, встречающихся в заданном целочисленном массиве  A(N)

6.15. [Pascal | Подсчитайте количество различных (не повторяющихся) чисел, встречающихся в заданной целочисленной матрице  A(N, M) .

6.16. [Pascal |]  Даны сведения о количестве забитых голов каждого футболиста команды в каждом из матчей чемпионата. Проверьте, сколько в команде есть футболистов:
   а) забивших хотя бы два гола;
   б) забивавших голы в каждом матче;
   в) не забивших ни одного гола.

6.17. [Pascal   Используя сведения о ежемесячных выплатах зарплаты сотрудникам фирмы, выясните, не оказалась ли годовая зарплата кого-либо из сотрудников ниже годового минимума, оговоренного в его контракте.

6.18. [Pascal | Используя сведения о результатах сдачи n вступительных экзаменов  m  абитуриентами, определите, сколько абитуриентов сдали все экзамены на "отлично".

6.19. [Pascal |  Используя сведения о размере обуви каждого члена баскетбольной команды, а также сведения о наличии в обувном магазине размеров спортивной обуви, определите, сколько членов команды можно обуть в этом магазине.

6.20*. [Pascal |  Найдите максимальное из чисел, встречающихся в заданной матрице более одного раза.

6.21*. [Pascal | Подсчитайте количество строк заданной целочисленной матрицы А(5,5), являющихся перестановкой чисел   1, 2, ..., 5.

6.22. [Pascal |   Из массива  A(N) , состоящего из натуральных чисел, получите массив  B(N) , элементами которого являются разрядности элементов массива  A(N) .

6.23. [Pascal   Задана последовательность  N  вещественных чисел. Определите, можно ли так переставить ее элементы, чтобы они образовали геометрическую прогрессию.

6.24. [Pascal |   В заданном одномерном массиве удалите каждый третий положительный элемент.

6.25. [Pascal |  В каждой строке матрицы  A(N, N)  определите наибольшее простое число. Если в строке нет простых чисел, выдайте соответствующее сообщение.

6.26. [Pascal |  Задана квадpатная таблица  А(N, N) , элементами котоpого являются нули и единицы. Подсчитайте в ней:
   а) количество квадpатов pазмеpом 3 на 3, в котоpых есть не менее пяти нулей;
   б) количество стpок, в котоpых есть тpи нуля, pасположенных pядом;
   в) количество столбцов, в котоpых нули и единицы чеpедуются;
   г) количество единичных столбцов и количество нулевых стpок.

6.27. [Pascal | Пифагоровыми называются тройки натуральных чисел  a, b, с , удовлетворяющие условию:  a2 + b2 = c2 . Например, пифагоровой является тройка чисел 6, 8, 10. Найдите все тройки пифагоровых чисел, не превышающих 25.

6.28. [Pascal  Совершенными называются числа, равные сумме своих делителей. Например, совершенным является число  28 , равное 1 + 2 + 4 + 7 + 14. Найдите все совершенные числа в интервале [1, 1000].

 

На первую страницу

Rambler's Top100 Rambler's Top100
PROext: Top 1000

(с)Все права защищены

По всем интересующим вопросам прошу писать на электронный адрес

Hosted by uCoz