Архитектура Аудит Военная наука Иностранные языки Медицина Металлургия Метрология Образование Политология Производство Психология Стандартизация Технологии |
Основные математические функции.
sqr(x) - возведение X в квадрат sqrt(x) - корень квадратный из X abs(x) - модуль от X int(x) - целая часть X (результат - вещественное число) trunc(x) - целая часть X (результат - целое число) round(x) - округляет число X до целого (результат - целое число) frac(x) - дробная часть от X pi - выдаёт число 3.1415926….. (19 знаков после запятой) sin(x) - синус X cos(x) - косинус X arctan(x) - арктангенс X exp(x) - возведение числа е=2.7183… в степень X (ех) ln(x) - логарифм числа X random(x) - выбирается случайное число от 0 до X-1 (целое) random - выбирается случайное число от 0 до 1 (вещественное) Рассмотрим несколько примеров:
Заданы a, x, y. Вычислите S=| a | + Ö x+ y 2 program zadacha2_8; var a, x, y, s: real; Begin writeln('введите число x '); readln(x); writeln('введите число y '); readln(y); writeln('введите число a '); readln(a); s: =abs(a)+sqrt(x+sqr(y)); writeln('s =', s); End.
Задан радиус (целое число). Вычислить площадь круга и длину окружности. program zadacha2_9; var r: integer; l, s:?????; {подумайте, какой тип данных необходимо записать} Begin writeln('введите радиус окружности r '); readln(r); l: =2*pi*r; s: =pi*sqr(r); writeln('площадь круга = ', s, ' длина окружности = ', l); End.
Заменяя в программе функцию int() на функции trunc(), round(), frac() и правильно используя типы данных, заполните таблицу:
program zadacha2_10; var a: real; d: real; Begin writeln('введите число '); readln(a); d: =int(a); writeln('результат - ', d); End.
Заданы x, y. Вычислите S = x y. Воспользуемся соотношением записанном в блоке 2: xy=exр(y*ln(x)) program zadacha2_11; var x, y: integer; s: real; Begin writeln('Введите число'); readln(x); writeln('Введите степень'); readln(y); s: =exp(y*(ln(x))); writeln(x, ' в степени ', y, ' = ', s: 9: 3); End. Вопросы для повторения: 28. В чём отличие функции int(x) от функции trunc(x)? 29. Чему равно: int(-7.7); 30. Чему равно: round(-7.7); 31. Придумайте три способа возведения числа b в четвёртую степень. 32. Вычислите: sqr(sqrt(7)). 33. С использованием каких функций можно вычислить tg x.
Задания для самостоятельной работы: 18. Задано число x. Вычислите s, если: a) s = cos x - sin x + |x-7| + x2 - 1 b)
c)
19. Задано вещественное число f. Вычислите разность целой и дробной части числа f. 20. Задано трёхзначное (четырёхзначное) число. Найдите цифры заданного числа, используя только функцию: a) int(); b) trunc(); c) frac(). 21. Задана сторона a равностороннего треугольника. Вычислите высоту треугольника и его площадь. 22. Даны числа n, k, m. Вычислите x и у, если: a) x = n (sin k + cos(m-2));
b) x =2n4+6n3-n2+3n-9;
c) x=cos(1+|m-en|-k2);
Практикум по составлению линейных алгоритмов. Решение прикладных задач.
23. Дано действительное число x. Не пользуясь никакими другими арифметическими операциями, кроме умножения, сложения и вычитания, вычислить 2x4 - 3x3 + 4x2 - 5x + 6. Разрешается использовать не более 4 умножений и 4 сложений и вычитаний. 24. Дано действительное число x. Не пользуясь никакими другими арифметическими операциями, кроме умножения, сложения и вычитания, вычислить 1 - 2x + 3x2 - 4x3 и 1 + 2x + 3x2 + 4x3. Разрешается использовать не более восьми операций. 25. Дана сторона a квадрата. Вычислите периметр, длину диагонали и площадь квадрата. 26. Даны стороны a и b прямоугольника. Вычислите периметр, длину диагонали и площадь прямоугольника. 27. Дана сторона a равностороннего треугольника. Вычислите периметр и площадь треугольника. 28. Дана длина ребра куба. Вычислите диагональ куба, объём куба и площадь его боковой поверхности. 29. Три сопротивления R1, R2, R3 соединены параллельно. Найдите сопротивление соединения. 30. Треугольник задан своими сторонами a, b, c. Используя формулу Герона (s = √ p(p-a)(p-b)(p-c), где p - полупериметр p=(a+b+c)/2 ) вычислите площадь треугольника. 31. Вычислите расстояние d между двумя точками с координатами x1, y1, x2, y2 (расстояние d = √ (x1-x2)2+(y1-y2)2). 32. Треугольник задан координатами своих вершин x1, y1, x2, y2, x3, y3. Вычислите площадь треугольника. 33. Сумма первых n членов арифметической прогрессии вычисляется по формуле Sn=(a1+an) ∙ n/2 где an=a1+d ∙ (n-1). Даны первый член прогрессии a1 и разность прогрессии d и количество членов прогрессии n. Вычислить Sn. Установить экспериментальным путём, при каком n значение Sn выходит за пределы integer. (Арифметическая прогрессия - это последовательность чисел, в которой разность между двумя соседними элементами постоянна. Например: 3, 7, 11, 15, 19, ... Здесь 3 - первый член прогрессии (a1), d=4 - разность прогрессии.) Задана температура в градусах по шкале Цельсия. Используя формулу перевода температуры из градусов по шкале Цельсия в градусы по шкале Фаренгейта F = 1.8 C + 32 получите температуру по Фаренгейту. Вопросы для повторения: 34. Найдите и объясните ошибки в описаниях переменных целого типа: Var a, b, c: integer; s{путь} v{скорость} t{время}: integer; d, e, f, : integer; const: integer; d+t: integer; x,, y: integer; q, w, e, r, t: integer k, l; integer; 35. Вычислите устно: a) 17 div 6 b) 34 mod 8 c) 19 div 4 d) 89 div 9 e) 89 mod 9 f) 77 mod 7 36. Какие числа можно получить при вычислении выражения x mod 5 =? 37. Вычислите значения выражений: a) trunc (2.8) e ) round (2.8) b) trunc (2.1) f ) round (2.1) c) trunc (-1.6) g ) round (-1.6) d) trunc (-1.1) h ) round (-1.1)
Чему равен результат работы программ при a = 253:
var a, x, y, z, b: integer; Begin readln(a); x: =a div 100; y: =(a div 10) mod 10; z: =a mod 10; b: =x*100+z; writeln(b); End. Популярное:
|
Последнее изменение этой страницы: 2016-05-30; Просмотров: 791; Нарушение авторского права страницы