Как написать программу в паскале для вычисления функции

Pascal: Занятие № 8. Подпрограммы: функции в Pascal

Стандартные функции языка Pascal

Арифметические функции (основные)

Функция	Назначение	Тип результата
abs (x)	абсолютное значение аргумента	совпадает с типом аргумента
sqr (x)	квадрат аргумента	совпадает с типом аргумента
sqrt (x)	квадратный корень аргумента	вещественный
cos (x)	косинус аргумента	вещественный
sin (x)	синус аргумента	вещественный
arctan (x)	арктангенс аргумента	вещественный
exp (x)	ex	вещественный
ln (x)	натуральный логарифм	вещественный
int (x)	целая часть числа	вещественный
frac (x)	дробная часть числа	вещественный

Функции преобразования типов

round (x)	— округляет вещественное число до ближайшего целого.
trunc (x)	— выдает целую часть вещественного числа, отбрасывая дробную.

Пользовательские функции Pascal

Функция в Паскале — это подпрограмма, которая в отличие от процедуры всегда возвращает какое-либо значение. Для этого в теле функции её имени присваивается вычисленное значение — результат, который она возвращает.

Функция – это подпрограмма, результатом работы которой является определенное значение.
Функции используются для:
- выполнения одинаковых расчетов в различных местах программы;
- для создания общедоступных библиотек функций.
Синтаксис:
заголовок начинается служебным словом function

описание формальных параметров (тех, значения которых передаются из основной программы в функцию):

параметры-переменные — параметры, значения которых становятся доступны и в основной программе (возвращаются в программу)

тип возвращаемого функцией результата описывается в конце заголовка функции через двоеточие:
Вызывается функция в теле основной программы, только если ее имя фигурирует в каком-либо выражении. В отличие от процедуры, которая вызывается отдельно.

Внутри функции можно объявлять и использовать локальные переменные:

Источник статьи: http://labs-org.ru/pascal-8/

Написать программу для вычислений значений функций

Разработать программу вычисления значений заданных функций для произвольных значений исходных данных
Разработать программу вычисления значений заданных функций для произвольных значений исходных.

Как создать в Word программу для вычислений значений тригонометрических функций
Как создать в Word программу для вычислений значений тригонометрических функций. Программа должна.

Написать программу для вычислений значений переменной Z по формуле
Приведённой в таблице, для значений аргумента X, изменяющегося в заданных пределах: от Xнач до Xкон.

Написать программу расчета значений тригонометрических функций для угла X
Задание: Написать программу расчета значений тригонометрических функций для угла X. .

Решение

А в задаче 19) у Вас нюансик:

В 3-ем условии при в функции , — действительных корней не имеет, при х 0

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Составьте программу с использованием функций для выполнения вычислений по следующим формулам: z=max(x, у);
Составьте программу с использованием функций для выполнения вычислений по следующим формулам.

Написать программу для вычислений по двум формулам
Вопрос по С++. Напишите программу для вычислений по двум формулам. Результаты вычислений по.

Написать программу для вычислений по заданной формуле
Я с паскалем пока на уровне простых формул синусов и косинусов, помогите с программой, продам душу.

Написать программу для вычислений по двум формулам
Напишите программу для вычислений по двум формулам. Результаты вычислений по формулам должны.

Источник статьи: http://www.cyberforum.ru/turbo-pascal/thread1119614.html

Как написать программу в паскале для вычисления функции

Процедуры и функции, написанные программистом, предназначены для оптимизации программ.

Основным их преимуществом является возможность многократного использования, более легкого и удобного тестирования и отладки независимо от других модулей.

В Паскале главная программа начинается с декларативной части, в которую, в частности, входят и описания всех процедур и функций. Обычно, в Паскале декларативная часть состоит из раздела определения констант, за которым следует раздел объявления переменных, а затем все процедуры и функции. Главное правило – любой объект должен быть описан до его первого использования.

Пример задачи: написать программу, которая определяет сумму квадратов n первых натуральных чисел. Сумма определяется в функции пользователя.

function powers (n: integer) : integer;

write (‘Сколько чисел нужно cложить?’);

writeln (‘сумма квадратов ‘,e,’ чисел’);

writeln (‘Число членов = ‘,e,’. Сумма = ‘,f);

Функции обычно применяются в расчетных задачах, когда необходимо выполнить ряд вычислений и передать их значения основной программе.

Первая строка описания функции называется заголовком. Она включает в себя имя функции, имя и тип каждого формального параметра, а также тип результата.

Например: function powers (n:integer):real;

Здесь имя функции – powers, у нее один формальный параметр – n, принадлежит типу integer. Функция возвращает результат типа integer.

За заголовком функции следует объявление локальных переменных подпрограммы.

Например: var i, sum:integer;

Локальные переменные, объявленные в подпрограмме, никак не связаны с объектами главной программы, даже если у них одинаковые имена.

За объявлениями, если они есть, следует пара ограничителей begin-end, окружающих набор предложений, составляющих саму функцию. При этом самым последним должно быть выполнено предложение, которым имени функции назначается некоторое значение, оно будет возвращено в главную программу.

Процедуры применяются, когда приходится решать задачи, в которых интересует не вычисление какого-то конкретного значения, а выполнение некоторой совокупности действий, например, отпечатать список чисел. Процедура обычно не возвращает в основную программу никакого значения. А если и передает данные, то только через глобальные переменные. Но существуют, так называемы, процедуры с параметрами, в которые (и даже из которых) можно передавать данные. В этой теме будут рассмотрены и примеры таких процедур. В Электронном задачнике даются задачи именно на такие процедуры.

Между функцией и процедурой имеется несколько различий. Наиболее существенное состоит в том, что функция всегда возвращает одно конкретное значение, тогда как процедура нет. Это различие отражается в особенности объявления процедур и функций.

Заголовок процедуры оформляется почти так же, как заголовок функции с той разницей, что в нем отсутствует указание о типе возвращаемого значения.

Пример: procedure test (a: real; var b: integer);

где test – заголовок процедуры, параметр – a типа real, параметр b типа integer.

Вызов процедуры из главной программы представляет собой просто имя процедуры со списком аргументов. Например: test (x,y). Процедуры вообще могут не иметь параметров.

Например, сумма n первых натуральных чисел:

program primer; // процедура без параметров

writeln(a ,’ чисел, сумма ‘,sum);

writeln(‘последовательное сложение натуральных чисел’);

write(‘сколько первых натуральных чисел сложить? ‘);

Пример решения задач из Электронного задачника:

Program Proc1; // процедура с параметрами

procedure powerA3(a:real;var b:real);

writeln(‘Вычисление 3-й степени числа:’);

writeln(3-я степень числа:’,c:2:1);

Program Proc3; // процедура с параметрами

procedure Mean(x,y:real;var AMean,GMean:real);

writeln(‘Введите числа a,b,c,d’);

writeln (‘sign(a)+sign(b) = ‘,sign(a)+sign(b));

if d=0 then RootsCount:=’один корень’;

if d>0 then RootsCount:=’два корня’;

writeln (‘введи коэффициенты квадратного уравнения a, b,c’);

Наберите и отладьте следующие программы, разберитесь в их работе:

1. Программа «Неповторяющиеся случайные числа» с использованием массива и процедуры без параметров.

if q[a]=q[b] then begin q[a]:=random(20); qw; end;

2. Проверка целого числа на четность (использование функции).

if (n mod 2)= 0 then Chet:=TRUE else Chet:=FALSE;

writeln(‘Введите целое число и нажмите Enter’);

writeln(‘Для завершения введите 100’);

then writeln( m,’ — четное число’)

else writeln( m,’ — нечетное число ‘);

3. Вычисление длины и площади окружности (использование процедуры с параметрами).

writeln(‘Вычисление длины окружности и площади круга:’);

write(‘Задайте радиус и нажмите Enter ‘);

writeln(‘Радиус окружности: ‘,t:3:1);

writeln(‘Длина окружности: ‘,l:3:1,’,площадь: ‘,s:3:1);

Выполните задания с Proc2 по Proc15 по электронному задачнику (стр.37) и с Proc18 по Proc22 по электронному задачнику (стр.39). Открыть его можно в режиме Помощь – Электронный задачник РТ.

Источник статьи: http://www.sites.google.com/site/osnovyprogrampaskal/tema-10-rabota-s-procedurami-i-funkciami

Написать программу для вычисления функций

Скрин во вложении

Комментарий модератора

фотографии текста запрещены. Фотография текста заменена текстом.

Написать программу для вычисления следующих функций:

Составить программу для вычисления значения функций f(x)
Заранее спасибо 🙂

Написать программу для вычисления функции
R=\begin\max (a,\ x/a,\ \sin ^2a)&\text<, if >a>0\text< and >x>1\\\\\min \left( a,\ ax+\sin.

Написать программу для машины с неограниченными регистрами для вычисления функции
Я в программировании вообще по нулям, так что прошу помощи. Нужно создать программу для следующих.

После ввода данных x и y выдает такое сообщение: значение было недопустимо малым или недопустимо большим для int32

Комментарий модератора

MOHTE23, не следует по каждому поводу плодить дублирующие темы. Тем более, что таким образом Вы разрываете контекст обсуждения.

function Ln(x: real): real; — Возвращает натуральный логарифм числа x
function Log2(x: real): real; — Возвращает логарифм числа x по основанию 2
function Log10(x: real): real; — Возвращает десятичный логарифм числа x
function LogN(base,x: real): real; — Возвращает логарифм числа x по основанию base

Я конечно понимаю, что в .NET это может и есть, как и много чего другого, но это насажденные инструменты, в отличии от классической реализации Паскаля.

P.S.: Логарифмы логарифмами, но надо и понимать как можно перейти от одного к другому.

Заказываю контрольные, курсовые, дипломные и любые другие студенческие работы здесь.

Написать программу для вычисления суммы членов последовательности
1)Дана арифметическая прогрессия a1,a2. an. Написать программу для вычисления суммы членов этой.

Написать программу для вычисления y, при введенном с консоли x
Не могу написать программу. Цикл не так задаю. Не знаю, как решить проблему.

Написать программу для вычисления суммы членов этой последовательности
1)Дана арифметическая прогрессия a1,a2. an. Написать программу для вычисления суммы членов этой.

Источник статьи: http://www.cyberforum.ru/pascalabc-net/thread1368155.html

Язык паскаль онлайн

Математические операции в паскале – Pascal Математические функции для работы с числами

Многие начинающие программисты задаются подобный вопросом : «Какие операции можно совершать с числами в языке программирования паскаль ?». В данном уроке мы подробно ответим на этот вопрос.

Арифметические операции

Начнем , пожалуй , с самого простого — арифметические операции с числами в паскале. В паскаль встроены многие привычные нам арифметические операции ( Сложение , вычитание , умножение , деление и т.п ).

Как же осуществляются подобные операции с числами ?. Давайте разберем это на примере исходника одной программы.

Результатом выполнения данной программы будет вывод на экран трех чисел 14 7 2 . Разберемся в том , как это работает.

В начале программы мы объявляем 2 целочисленные ( integer ) переменные «a» и «b» , а также 1 переменную «c» вещественного ( real ) типа. Подробнее прочитать о переменных в паскаль и их типах здесь.

Зачем нам нужна вещественная переменная ? Для записи результата деления целочисленная переменная не подходит , так как у нас получается дробь , а не целое число.

Теперь мы присваиваем переменной «a» значение 7 , а переменной «b» значение 3
. Переменную «c» при этом оставляем нулевой ( она нам пока не понадобится ).

Далее (в блоке begin end) мы расписываем арифметические операции с нашими числами. Обратите внимание на то , что после символов // идет комментарий , который не компилируется программой.

Запомните : Строка a:= a — b; выглядит так a:= 7 — 4; , а не так 7:= 7 — 4;

Другие операции с числами

В паскале предусмотрены и многие другие операции с числами. Давайте разберем самые популярные из них.

1. Как найти квадрат числа в паскале ?

Для нахождения квадрата числа в паскале предусмотрена функция sqr(x) , где x — число.
Пример :

Результат : переменной «а» присваивается значение 25.

2. Как найти корень числа в паскале ?

Для нахождения корня числа в паскале предусмотрена функция sqrt(x) , где x — число.
Пример :

Результат : переменной «а» присваивается значение 5.

3. Как округлить число в паскале ?

Для того , чтобы округлить некоторое число используется операция round(x).
Пример :

4. Как убрать дробную часть у числа в паскале ?

Для того , чтобы отбросить дробную часть числа используется операция trunc(x).
Пример :

Результат : переменной «а» присваивается значение 25.

5. Как убрать целую часть у числа в паскале ?

Для того , чтобы отбросить целую часть числа используется операция frac(x).
Пример :

Результат : переменной «а» присваивается значение 0.2.

6. Как получить модуль числа в паскале ?

Чтобы получить модуль некоторого числа используется операция abs(x).
Пример :

Результат : переменной «а» присваивается значение 8.

Это были самые важные и часто используемые операции в паскале для работы с числами ( переменными ). Найти другие вы можете на этой странице.

Выводы :

Для работы с числами в паскале предусмотрено множество различных операций. Мы можем делать с числами все , что угодно ( складывать , умножать , возводить в квадрат и т.п ).

Этот раздел содержит описание математических операций, которыми можно пользоваться в выражениях на языке Паскаль. Вывести результат вычисления выражения можно такой нехитрой программе:

Конечно, результат вычисления выражения можно и записать в переменную для дальнейшего использования, и передать в другую функцию.

Не все операции и действия в этом разделе будут вам понятны. Ничего страшного — просто помните, что сюда можно вернуться, когда вам что-то понадобится.

Математические операции

В Паскале, как и в большинстве языков программирования, несколько специфически передаются основные математические операции — так математические выражения надо записывать в одну строку, а не в несколько уровней, как принято в классической математической нотации. Это достигается значительно более массовым использованием скобок, что иногда огорчает начинающих. Также всегда нужно писать знак умножения *. Кроме того, параметры функций всегда должны быть в скобках. Например:

Математическое выражение	Запись на языке Паскаль
2+2=4	2+2=4
	a*(1+sqr(e))/2
	(-b+sqrt(sqr(b)-4ac))/(2*a)
	exp(2*x+y)
	abs(cos(x)sin(x)cos(y)/tan(y)) если компилятор не поддерживает Tan.

Базовая арифметика

Название операции	Оператор	Пример	Примечание
Добавление	+	2+2 (=4)
Вычитание	—	18.3-11 (=7.3)
Умножение	*	7*8 (=56)
Деление	/	7/8 (=0.875)	Результат всегда действительного типа (real)
Целая часть деления	div	7 div 2 (=3)
Остаток от деления	mod	7 mod 2 (=1)

Сравнение

Все операции сравнения возвращают значение типа boolean, то есть могут использоваться в операторах ветвления и циклах, например

Название операции

Оператор

Пример

Равно

2+2=4

Не равно (?)

2+2<>5

Больше

72>71.99

Больше или Равно

x*x>=0

Меньше

Функции для преобразования действительных и целых чисел

Паскаль — язык программирования со статической сильной типизацией. Это означает, что компилятор не выполняет преобразований значений между типами, которые могут привести к потере информации; в частности, если подставить в конструкцию, предусматривает целое значение, действительное число, компилятор сообщит об ошибке, даже если это число имеет целое значение. Так, как мы видели выше, 13 and 11 равна 9, но выражение 13.0 and 11 вызовет сообщение компилятора об ошибке! Чтобы избежать этого, надо явно задавать преобразования действительного числа на целое с помощью следующих функций:

Название функции	описание	пример
Round(X)	Возвращает целое значение, ближайшее к X	Round(1.7)=2, Round(-3.1)=-3
Int(X), Trunc(X)	Возвращает целую часть X	Int(1.8)=1, Trunc(-11.3)=-11
Floor(X)	Возвращает наибольшее целое значение, не превышает X	Floor(1.7)=1, Floor(-3.1)=-4
Ceil(X)	Возвращает наименьшее целое значение, не менее от X	Ceil(1.7)=2, Ceol(-3.1)=-3

Логические и побитовые операции

Логические операции используются для объединения нескольких логических условий в одну.

Название операции	оператор	пример	описание
Логическое И, and, логическое умножение	and	(2+3=5) and (0>-1)	Истинное, если оба операнда истинны
Логическое ИЛИ, or, логическое сложение	or	(2+2=5) or (1=1)	Истинное, если хотя бы один из операндов истинный
Логическое исключающее ИЛИ, eXclusive or	xor	(2+2=5) xor (1=1)	Истинное, если ровно один из операндов истинный
Отрицание, логическое НЕ, not	not	not (2+2=5)	Истинное, если операнд ложный

Логические операторы, применены к целым типов, могут использоваться, как побитовые. Чтобы получить результат побитовой операции, надо представить операнды в двоичной системе (так, как они представлены в компьютере), после чего применить соответствующую операцию в соответствующих разрядов, причем 1 означает true 0 — false. так,

13 в двоичной системе будет	1	1	1
11 в двоичной системе будет	1	1	1
9 в двоичной системе будет	1	1

Кроме того, есть еще две побитовых операции сдвига:

Название операции	оператор	пример	описание
сдвиг вправо	shr	14 shr 2 (=3)	Сдвигает двоичные разряды первого операнда справа на второй операнд разрядов;эквивалент целой части деления на степень 2
смещение слева	shl	7 shl 3 (=56)	Сдвигает двоичные разряды первого операнда слева на второй операнд разрядов;эквивалент умножению на степень 2

Алгебраические функции

Cерым обозначены функции, которые не поддерживаются в Turbo Pascal

Название функции	описание	Заменитель (для Turbo Pascal)
Pi	Возвращает значение числа <\ displaystyle \ pi > (+3,141592653589793238462643383279 … с точностью, определенным типом real)
Abs(X)	Абсолютное значение (модуль) X
Sign(X)	Знак числа X: 1, если X отрицательный, 1, если положительный 0, если X = 0
Exp(X)	Экспонента X (e X)
Ln(X)	Натуральный логарифм X
Log2(X)	Логарифм X по основанию 2	Ln(X)/Ln(2)
Log10(X)	Логарифм X по основанию 10	Ln(X)/Ln(10)
LogN(X,Y)	Логарифм Y по основанию X	Ln(Y)/Ln(X)
Power(X,Y)	Степень X Y	Exp(Y*Ln(X))
Sqrt(X)	Корень квадратный из X
Sqr(X)	квадрат X
Max(X,Y)	Более из значений X и Y
Min(X,Y)	Меньше из значений X и Y

Примечание: корень степени Y из числа X можно представить как X 1 / Y, и, соответственно, как Power (X, 1 / Y) или в Turbo Pascal как Exp (Ln (X) / Y).

Тригонометрические функции

Тригонометрические функции используют значения углов в радианах , будьте внимательны!

Название функции	описание	Заменитель (для Turbo Pascal)
DegToRad (X)	Вычисляет радианной меру угла X, представленного в градусах	X * Pi / 180
RadToDeg (X)	Вычисляет градусную меру угла X, представленного в радианах	X * 180 / Pi
Sin (X)	Синус X (X в радианах)
Cos (X)	Косинус X (X в радианах)
Tan (X)	Тангенс X (X в радианах)	Sin (X) / Cos (X)
ArcTan (X)	Арктангенс X, угол, тангенс которого равен X, в радианах
ArcSin (X)	Арксинус X, угол, синус которого равен X, в радианах	ArcTan (X / sqrt (1-sqr (X)))
ArcCos (X)	Арккосинус X, угол, косинус которого равен X, в радианах	2 * ArcTan ((1-X) / (1 + X))
Sinh (X)	Гиперболический синус X	(Exp (X) -exp (-X)) / 2
Cosh (X)	Гиперболический косинус X	(Exp (X) + exp (-X)) / 2
Tanh (X)	Гиперболический тангенс X	(Exp (2 * X) -1) / (exp (2 * X) +1)

Функции для работы со случайными величинами

Для имитации случайных процессов в Паскале есть генератор псевдослучайных чисел (ГПВЧ) и функции для работы с ним; такие числа достаточно непредсказуемыми для практического использования (то есть каждое последующее использование функции Random даст какой-то мере неожиданный результат), но их последовательность может быть полностью воспроизведена, если установить начальное значение ГПВЧ.

Название функции	описание	Заменитель (для Turbo Pascal)
Randomize	Устанавливает начальное значение ГПВЧ равным текущему значению часов
Randomize (X)	Устанавливает начальное значение ГПВЧ равным X
Random	Возвращает псевдослучайное действительное число от 0 (включительно) до 1 (без включительно)
Random (X)	Возвращает псевдослучайное целое число от 0 до X-1
Random (X, Y)	Возвращает псевдослучайное целое число от X до Y	X + Random (Y-X + 1)

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

Для величин сочтеных типов (все цели, буквенный, логическое и перечни) существуют также несколько удобных стандартных функций и процедур:

Название функции	описание
Succ (X)	Возвращает значение, идет после X (для целых — X + 1, для буквенного — символ с последующим значением, для перечисления — следующее значение: так, Succ ( ‘A’) возвращает ‘B’
Pred (X)	Возвращает, предшествующий X (для целых — X-1, для буквенного — символ с предыдущим значением, для перечисления — предварительное значение: так, Pred ( ‘A’) возвращает ‘@’
Inc (X)	Увеличивает значение X на 1, эквивалент X = Succ (X)
Inc (X, N)	Увеличивает значение X на N, эквивалент N приложений Inc (X)
Dec (X)	Уменьшает значение X на 1, эквивалент X = Pred (X)
Dec (X, N)	Уменьшает значение X на N, эквивалент N применений Dec (X)
Ord (X)	Возвращает X (для нечисловых типов)
Odd (X)	Проверяет X на нечетность, true, если X нечетный или false, если X имеет четное значение

Приоритет операций

Во время разбора математического выражения Паскаль сначала выполняет операции с высоким приоритетом, затем с низким, все справа налево. Так, в выражении 2 + 2 * 2 сначала будет вычислено 2 * 2 = 4, а уже затем 2 + 4 = 6 — так же, как в обычной математике; в выражении 10 mod 2 * 3 сначала будет выполнено 10 mod 2 = 0, а уже потом 0 * 3 = 0!

Источник статьи: http://mypascal.ru/blog/chisla-v-paskale/