Добавил:
Upload Опубликованный материал нарушает ваши авторские права? Сообщите нам.
Вуз: Предмет: Файл:
TurboPascal_СПРАВОЧНИК.doc
Скачиваний:
1
Добавлен:
01.05.2025
Размер:
309 Кб
Скачать
☆

Задачи цикл while:

  1. Вычислить сумму нечетных чисел от 1 до некоторого числа n

  2. Составить таблицу значений функции на отрезке [2;4] с шагом 0,2.

  3. Дано натуральное число. Определить:

    1. количество цифр в нем;

    2. сумму его цифр;

    3. сумму m его последних цифр.

    4. произведение его цифр;

    5. среднее арифметическое его цифр;

    6. сумму квадратов его цифр;

    7. его первую цифру;

  4. Дано натуральное число.

    1. Верно ли, что сумма его цифр больше 10?

    2. Верно ли, что произведение его цифр меньше 50?

    3. Верно ли, что количество его цифр есть четное число?

    4. Верно ли, что это число четырехзначное?

  5. Напечатать минимальное число, больше 200, которое нацело делится на 17.

  6. Найти максимальное из натуральных чисел, не превышающих 5000, которое нацело делится на 39.

  7. Дано натуральное число. Найти его наименьший делитель, отличный от 1.

  8. Даны натуральные числа a и b. Найти НОД(a,b) и НОК(a,b).

  9. Даны натуральные числа a и b, обозначающие соответственно числитель и знаменатель дроби. Сократить дробь, т.е. найти такие натуральные числа p и q, не имеющие общих делителей, что p/q=a/b.

  10. Даны натуральные числа m и n. Получить все кратные им числа, не превышающие m*n. Условный оператор не использовать.

  11. Дано натуральное число.

    1. Получить число, получаемое при прочтении его цифр справа налево.

    2. Приписать по двойке в начало и конец записи этого числа.

    3. Удалить из него все цифры А.

    4. Переставить его первую и последние цифры.

    5. Приписать к нему такое же число. (получить это число)

  12. Дано натуральное число. Определить номер цифры 3 в нем, считая от конца числа. Если такой цифры нет, ответом должно быть число 0, если таких цифр в числе несколько - должен быть определен номер самой правой из них.

  13. Дан прямоугольник с размерами axb. От него отрезают квадраты максимального размера, пока это возможно. Затем от оставшегося прямоугольника вновь отрезают квадраты максимально возможного размера и т.д. На какие квадраты и в каком их количестве будет разрезан исходный прямоугольник?

  14. Дана непустая последовательность целых чисел, оканчивающаяся нулем. Найти:

    1. сумму всех чисел последовательности;

    2. количество всех чисел последовательности.

  15. Определить:

    1. является ли заданное число степенью числа 3;

    2. является ли заданное число степенью числа 5.

  16. Дано число n.

    1. Напечатать те натуральные числа, квадрат которых не превышает n.

    2. Найти первое натуральное число, квадрат которого больше n.

Составное условие и вложенный условный оператор не использовать.

    1. Верно ли, что его первая цифра не превышает 6?

    2. Верно ли, что оно начинается и заканчивается одной и той же цифрой?

    3. Определить, какая из его цифр больше: первая или последняя.

  1. Дано натуральное число. Определить:

    1. есть ли в нем цифра 3;

    2. есть ли в нем цифры 2 и 5.

    3. есть ли в нем цифра А.

    4. верно ли, что в нем нет цифры В?

    5. верно ли, что цифра А встречается в нем более К раз?

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

  3. Найти все натуральные числа, меньшие 200, у которых сумма цифр равна 13.

  4. Найти все целые числа от 30 до 350, у которых сумма цифр равна 15.

  5. Найти все целые числа из промежутка от 1 до 100, у которых есть цифра ‘7’.

  6. Найти все целые числа из промежутка от 50 до 150, у которых есть цифра ‘9’.

  7. Найти все целые числа из промежутка от 10 до 200, у которых есть цифры ‘2’ и ’5’.

  8. Найти размеры всех прямоугольников, площадь которых равна заданному натуральному числу s и стороны которого выражены натуральными числами. При этом решения, которые получаются перестановкой размеров сторон:

    1. считать разными;

    2. считать совпадающими.

Соседние файлы в предмете [НЕСОРТИРОВАННОЕ]