М. Э. Абрамян Programming Taskbook


Функции с числовыми параметрами



Download 0,55 Mb.
Pdf ko'rish
bet15/73
Sana24.02.2022
Hajmi0,55 Mb.
#249225
1   ...   11   12   13   14   15   16   17   18   ...   73
Bog'liq
Abramyan (programmalash)

Функции с числовыми параметрами
Proc16. Описать функцию Sign() целого типа, возвращающую для веще-
ственного числа следующие значения:
1, если < 0;
0, если = 0;
1, если > 0.
С помощью этой функции найти значение выражения Sign(A) + Sign(B)
для данных вещественных чисел и B.


Процедуры и функции
39
Proc17. Описать функцию RootsCount(ABC) целого типа, определяющую
количество корней квадратного уравнения A·x
2
B·x = 0 (AB
вещественные параметры, A 6= 0). С ее помощью найти количество корней
для каждого из трех квадратных уравнений с данными коэффициентами.
Количество корней определять по значению дискриминанта:
B
2
− 4·A·C.
Proc18. Описать функцию CircleS(R) вещественного типа, находящую пло-
щадь круга радиуса (— вещественное). С помощью этой функции
найти площади трех кругов с данными радиусами. Площадь круга ради-
уса вычисляется по формуле π·R
2
. В качестве значения π использо-
вать 3.14.
Proc19. Описать функцию RingS(R
1
R
2
) вещественного типа, находящую пло-
щадь кольца, заключенного между двумя окружностями с общим центром
и радиусами R
1
и R
2
(R
1
и R
2
— вещественные, R
1
R
2
). С ее помощью
найти площади трех колец, для которых даны внешние и внутренние ра-
диусы. Воспользоваться формулой площади круга радиуса Rπ·R
2
. В
качестве значения π использовать 3.14.
Proc20

. Описать функцию TriangleP(ah), находящую периметр равнобед-
ренного треугольника по его основанию и высоте h, проведенной к
основанию (и — вещественные). С помощью этой функции найти
периметры трех треугольников, для которых даны основания и высоты.
Для нахождения боковой стороны треугольника использовать теорему
Пифагора:
b
2
= (a/2)
2
h
2
.
Proc21

. Описать функцию SumRange(AB) целого типа, находящую сумму
всех целых чисел от до включительно (и — целые). Если B,
то функция возвращает 0. С помощью этой функции найти суммы чисел
от до и от до C, если даны числа ABC.
Proc22. Описать функцию Calc(ABOp) вещественного типа, выполняющую
над ненулевыми вещественными числами и одну из арифметических
операций и возвращающую ее результат. Вид операции определяется це-
лым параметром Op: 1 — вычитание, 2 — умножение, 3 — деление, осталь-
ные значения — сложение. С помощью Calc выполнить для данных и B
операции, определяемые данными целыми N
1
N
2
N
3
.
Proc23. Описать функцию Quarter(xy) целого типа, определяющую номер
координатной четверти, в которой находится точка с ненулевыми веще-


40
М. Э. Абрамян. Электронный задачник Programming Taskbook 4.6
ственными координатами (xy). С помощью этой функции найти номера
координатных четвертей для трех точек с данными ненулевыми коорди-
натами.
Proc24. Описать функцию Even(K) логического типа, возвращающую
TRUE
,
если целый параметр является четным, и
FALSE
в противном случае. С
ее помощью найти количество четных чисел в наборе из 10 целых чисел.
Proc25

. Описать функцию IsSquare(K) логического типа, возвращающую
TRUE
, если целый параметр (> 0) является квадратом некоторого це-
лого числа, и
FALSE
в противном случае. С ее помощью найти количество
квадратов в наборе из 10 целых положительных чисел.
Proc26. Описать функцию IsPower5(K) логического типа, возвращающую
TRUE
, если целый параметр (> 0) является степенью числа 5, и
FALSE
в
противном случае. С ее помощью найти количество степеней числа 5 в
наборе из 10 целых положительных чисел.
Proc27. Описать функцию IsPowerN(KN) логического типа, возвращающую
TRUE
, если целый параметр (> 0) является степенью числа (> 1), и
FALSE
в противном случае. Дано число (> 1) и набор из 10 целых по-
ложительных чисел. С помощью функции IsPowerN найти количество
степеней числа в данном наборе.
Proc28. Описать функцию IsPrime(N) логического типа, возвращающую
TRUE
,
если целый параметр (> 1) является простым числом, и
FALSE
в против-
ном случае (число, большее 1, называется простым, если оно не имеет
положительных делителей, кроме 1 и самого себя). Дан набор из 10 це-
лых чисел, больших 1. С помощью функции IsPrime найти количество
простых чисел в данном наборе.
Proc29. Описать функцию DigitCount(K) целого типа, находящую количество
цифр целого положительного числа K. Используя эту функцию, найти ко-
личество цифр для каждого из пяти данных целых положительных чисел.
Proc30. Описать функцию DigitN(KN) целого типа, возвращающую N-ю циф-
ру целого положительного числа (цифры в числе нумеруются справа
налево). Если количество цифр в числе меньше N, то функция возвра-
щает 1. Для каждого из пяти данных целых положительных чисел K
1
,
K
2
. . .K
5
вызвать функцию DigitN с параметром N, изменяющимся от 1
до 5.
Proc31. Описать функцию IsPalindrom(K), возвращающую
TRUE
, если целый
параметр (> 0) является палиндромом (то есть его запись читается оди-


Процедуры и функции
41
наково слева направо и справа налево), и
FALSE
в противном случае. С
ее помощью найти количество палиндромов в наборе из 10 целых поло-
жительных чисел. При описании функции можно использовать функции
DigitCount и DigitN из заданий Proc29 и Proc30.
Proc32. Описать функцию DegToRad(D) вещественного типа, находящую ве-
личину угла в радианах, если дана его величина в градусах (— веще-
ственное число, 0 < < 360). Воспользоваться следующим соотношением:
180

π радианов. В качестве значения π использовать 3.14. С помощью
функции DegToRad перевести из градусов в радианы пять данных углов.
Proc33. Описать функцию RadToDeg(R) вещественного типа, находящую ве-
личину угла в градусах, если дана его величина в радианах (— веще-
ственное число, 0 < < 2·π). Воспользоваться следующим соотношением:
180

π радианов. В качестве значения π использовать 3.14. С помощью
функции RadToDeg перевести из радианов в градусы пять данных углов.
Proc34. Описать функцию Fact(N) вещественного типа, вычисляющую зна-
чение факториала N! = 1·2·. . .·N (> 0 — параметр целого типа; веще-
ственное возвращаемое значение используется для того, чтобы избежать
целочисленного переполнения при больших значениях N). С помощью
этой функции найти факториалы пяти данных целых чисел.
Proc35. Описать функцию Fact2(N) вещественного типа, вычисляющую двой-
ной факториал:
N!! = 1·3·5·. . .·N, если — нечетное;
N!! = 2·4·6·. . .·N, если — четное
(> 0 — параметр целого типа; вещественное возвращаемое значение ис-
пользуется для того, чтобы избежать целочисленного переполнения при
больших значениях N). С помощью этой функции найти двойные факто-
риалы пяти данных целых чисел.
Proc36. Описать функцию Fib(N) целого типа, вычисляющую N-й элемент
последовательности чисел Фибоначчи F
K
, которая описывается следую-
щими формулами:
F
1
= 1,
F
2
= 1,
F
K
F
K−2
F
K−1
= 3, 4, . . . .
Используя функцию Fib, найти пять чисел Фибоначчи с данными номе-
рами N
1
N
2
. . .N
5
.


42
М. Э. Абрамян. Электронный задачник Programming Taskbook 4.6

Download 0,55 Mb.

Do'stlaringiz bilan baham:
1   ...   11   12   13   14   15   16   17   18   ...   73




Ma'lumotlar bazasi mualliflik huquqi bilan himoyalangan ©hozir.org 2024
ma'muriyatiga murojaat qiling

kiriting | ro'yxatdan o'tish
    Bosh sahifa
юртда тантана
Боғда битган
Бугун юртда
Эшитганлар жилманглар
Эшитмадим деманглар
битган бодомлар
Yangiariq tumani
qitish marakazi
Raqamli texnologiyalar
ilishida muhokamadan
tasdiqqa tavsiya
tavsiya etilgan
iqtisodiyot kafedrasi
steiermarkischen landesregierung
asarlaringizni yuboring
o'zingizning asarlaringizni
Iltimos faqat
faqat o'zingizning
steierm rkischen
landesregierung fachabteilung
rkischen landesregierung
hamshira loyihasi
loyihasi mavsum
faolyatining oqibatlari
asosiy adabiyotlar
fakulteti ahborot
ahborot havfsizligi
havfsizligi kafedrasi
fanidan bo’yicha
fakulteti iqtisodiyot
boshqaruv fakulteti
chiqarishda boshqaruv
ishlab chiqarishda
iqtisodiyot fakultet
multiservis tarmoqlari
fanidan asosiy
Uzbek fanidan
mavzulari potok
asosidagi multiservis
'aliyyil a'ziym
billahil 'aliyyil
illaa billahil
quvvata illaa
falah' deganida
Kompyuter savodxonligi
bo’yicha mustaqil
'alal falah'
Hayya 'alal
'alas soloh
Hayya 'alas
mavsum boyicha


yuklab olish