Задачи для самостоятельной работы по теме 1

1.1.1	Дано вещественное число. Определить порядок числа и количество цифр в изображении числа.
1.1.2	Дано целое число N. Разложить его на простые множители. Вывести на экран исходное число и полученные множители.
1.1.3	Дано целое число с количеством цифр в его записи <= 10. Записать число в обратном порядке.
1.1.4.	Дано целое число X>99. Определить число сотен в записи числа.
1.1.5	Часовая стрелка образует угол j с лучом, проходящим через центр и через точку, соответствующую 12 часам на циферблате: 0<j<2p. Определить значение угла для минутной стрелки при заданной величине угла j, а также количество полных часов и полных минут.
1.1.6	Дано целое числа n. Найти знакочередующуюся сумму цифр числа n. (, где αi – цифры числа n, а переменная определяет количество цифр в записи числа).
1.1.7	Дано 10- разрядное число. Определить, является ли введенное число палиндромом. (Число, у которого значение при чтении справа налево и слева направо одинаково, называется палиндромом).
1.1.8	Дано некоторое натуральное число. Определить сколько и каких цифр встречается в записи числа. Результат обработки: <цифра> - <количество>.
1.1.9	Дано целое число. Найти произведение всех его цифр.
1.1.10	Дано целое натуральное число. Каждую цифру числа заменить на дополнение ее до 10. Вывести на экран исходное число и преобразованное.
1.1.11	Даны два целых числа M и N. Найти все одинаковые цифры в каждом из чисел.
1.1.12	Даны целые положительные числа k и N. Найти P=(K)^N! Определить диапазон допустимых значений N.
1.1.13	Даны целые числа m, N. Определить сумму любых m цифр числа N.
1.1.14	Дано целое число N, определяющее возраст человека. Для этого числа определить наименование: год, года, лет. Например, 31 год, 32 года, 25 лет.
1.1.15	Дано целое число X. Определить сумму k младших цифр в записи числа.
1.1.16	Дано целое число K, имеющее значения в диапазоне 1..365. Определить номер дня недели(1..7), на который приходится введенный число для не високосного года (високосным считается год, который делится на 4, но не 100 и т.п.). Считаем, что первый день года,1 января, это понедельник.
1.1.17	Определить значение угла в градусах между положением часовой стрелки в начале суток и ее положением в H часов, M минут и S секунд (0<=H<=11, 0<=M<=59,0<= S<=59).
1.1.18	Дано вещественное число. Определить первую цифру дробной части числа.
1.1.19	Дано целое число N. Выделить из числа все четные цифры.
1.1.20	Найти наибольший общий делитель двух натуральных чисел.
1.1.21	Из вводимого набора целых чисел найти числа, для которых квадрат заданного трехзначного числа равен кубу суммы его цифр.
1.1.22	Дано целое число. Определить количество нулей в записи числа.
1.1.23	Дано вещественное число. Определить порядок числа для записи его в форме: +-a.bE1^+^-^x, где 1<=а<=9, b - дробная часть в записи числа, x- степень основания системы счисления.
1.1.24	Дано целое число. Определить количество цифр, стоящих на нечетных местах в записи числа.
1.1.25	Дано целое число. Поменять порядок цифр в записи числа на обратный.
1.1.26	Дано целое N - разрядное число. Поменять местами первую цифру с последней цифрой в записи числа.
1.1.27	Дано N - разрядное целое десятичное число. Преобразовать его в запись числа в восьмеричной системе счисления.
1.1.28	Дано N - разрядное целое десятичное число. Преобразовать его в запись числа в двоичной системе счисления.
1.1.29	Из заданного набора чисел найти числа, не имеющие общих делителей.
1.1.30	Дано некоторое целое число. Все нули в изображении числа заменить единицами.
1.1.31	Задано вещественное число. Определить порядок числа и количество цифр в изображении дробной части числа.
1.1.32	Написать программу, позволяющую получить все перестановки из К различных элементов и напечатать все перестановки.
1.1.33	Длина отрезка задана в дюймах (1 дюйм=2.54 см). Перевести длину в метрическую систему – в метрах, сантиметрах и миллиметрах.
1.1.34	Дано целое число n. Определить сколько одинаковых цифр в записи числа.
1.1.35	Правительство объявляет, что инфляция в течение года составит не более P% в месяц. Какого роста цен за год можно ожидать.
1.1.36	Длина некоторого отрезка составляет P метров. Переведите ее в русскую, неметрическую систему измерений: 1 вершок - 44,45 мм, 1 аршин – 16 вершков, 1 сажень – 3 аршина, 1 верста – 500 саженей.
1.1.37	Задана дата в виде целого десятичного числа. Для этой даты записать ее эквивалент в римской системе счисления: M - 1000, D - 500, C - 100, L - 50, X – 10, V -5, I =1
1.1.38	Дано целое число n. Определить сумму его делителей. Проверить, является ли заданное число совершенным. Например, 6=1+2+3
1.1.39	Дано целое число n. Найти в записи чисел наибольшее количество подряд стоящих одинаковых цифр.
1.1.40	Для целых чисел, не превышающих заданного числа K, проверить признак делимости на 9. Сумма цифр числа, делящегося на 9, также делится на 9.
1.1.41	Дано целое число n. Определить разность между суммой цифр, стоящих на Нечетных местах, и суммой цифр, стоящих на четных местах в записи числа. Известно, что если эта сумма кратна 11, то и число делится на 11. Проверьте.
1.1.42	Дано целое число n. Найти все целые натуральные числа, не превосходящие заданное число n, которые делятся на каждую из своих цифр.
1.1.43	Любое целое число может быть выражено через k троек и m пятерок: n=k*3+m*5. Найти для заданного числа n значения k и m.
1.1 44	Заданы три числа k, m, n, которые являются остатками от деления искомого числа x соответственно на 3, 5, 7. Найти число x.
1.1.45	Дано целое число n. Переставить его цифры так, чтобы его значение стало максимально возможным.

Б) Вычисление значений функций и рядов с заданной точностью.

Пример к разделу 1б.

Дана функция . Вычислить значение y c погрешностью, не превышающей заданную величину ε.

Для определения значения y используем известную итерационную формулу:

.В качестве начального значения y берем x, а i изменяется от 0 до любого числа n, при котором будет достигнута требуемая точность решения задачи.

Алгоритм решения задачи.

Рис. 12

Текст программы в консольном исполнении:

program Project_root;

{$APPTYPE CONSOLE}

uses

SysUtils;

var y,x,eps,y0:real;

k:integer;

ch:char;

begin

repeat

writeln('Enter x');

readln(x);

writeln('Enter eps');

readln(eps);

k:=0;

y0:= x;

Repeat

y:=y0;

y0:= (y+x/y)/2;

k:=k+1;

Until abs(y-y0)<eps;

writeln('Result = ', y:15:10);

writeln(‘ Count of repeat= ’, k);

writeln('Repeat ---Y');

Readln(ch);

until ch='y';

{ TODO -oUser -cConsole Main: Insert code here }

End.

Пример решения задачи:

Рис. 13

На результирующем экране показано, что количество выполняемых действий зависит от заданной погрешности ε. При уменьшении погрешности для вычисления количество шагов до получения результат увеличилось на 1.Сами значения совпадают только до 5 знаков дроби.

1.1.46. l n(1-x)=-(x+x²/ 2 +x³/3 + …+ xⁿ/n) для х<1

1.1. 47 ln| sin(x)| =-ln2 –cos(2x)-cos(4x)/2 -… - cos(2nx)/n, для 0<х<p

1.1.48. a^x= 1+xln(a)/1! + (xln(a))²/2! + …+(xln(a))ⁿ/n!

1.1.49. sin(x)=x-x³/3! +x⁵/5! +.. +(-1)^(n-1)(x^2n-1)/(2n-1)!

1.1.50. sin(x)=x(1-x²/p²) (1-x²/4p²)…(1-x²/(n-1)²p²)…

1.1.51. cos(x)=(1-4x²/p²)(1-4x²/9p²)…(1-4x²/ (2n-1)²p²) ….

1.1.52. Arctg(x)=x-x³/3+x⁵/5 -.. +(-1)ⁿx²ⁿ⁺¹/(2n+1)+…

1.1.53. p²/8-p/4| x| =cos(3x)/3² + cos(5x)/5² + …+cos((2n+1)x)/(2n+1)² , для |x |<1

1.1.54. ¼*ln((1+x)/(1-x))+1/2arctg(x)=x+x⁵/5+…+x⁴ⁿ⁺¹/(4n+1)+…, для -1<х<1

1.1.55. (1+2x²)e^(x2)=1+3x²+…+(2n+1)/n! *x²ⁿ+…

1.1.56. ¼ *(x²-p²/3)=-cos(x)+cos(2x)/2² -…+(-1)n*cos(nx)/n² +…, для p/5 ³ x £ p

1.1.57. Для заданного значения погрешности e найти такое наименьшее значение n, для которого будет выполняться соотношение:

2ⁿ/n! <e

Дата добавления: 2014-12-27