Подпрограммы, определенные пользователем в языке программирования Pascal
Язык программирования Turbo Pascal. Подпрограммы, определенные пользователем, их классификация и типы, оценка возможностей, процедуры и функции. Область действия идентификаторов. Способы обмена информацией. Решение типового задания на языке Паскаль.
| Рубрика | Программирование, компьютеры и кибернетика |
| Вид | реферат |
| Язык | русский |
| Дата добавления | 21.03.2012 |
| Размер файла | 227,3 K |
Отправить свою хорошую работу в базу знаний просто. Используйте форму, расположенную ниже
Студенты, аспиранты, молодые ученые, использующие базу знаний в своей учебе и работе, будут вам очень благодарны.
If S1>S2 Then Swap (S1, S2);
If S2>S3 Then Swap (S2, S3);
If S1>S2 Then Swap (S1, S2);
Writeln ('Числа в порядке неубывания: V', S1, S2, S3)
End.
Пример 4.
1).Рассмотрим использование процедуры на примере программы поиска максимума из двух целых чисел.
var x, y, m, n: integer;
procedure MaxNumber (a, b: integer; var max: integer);
begin
if a>b then max:=a else max:=b;
end;
begin
write ('Введите x, y ');
readln (x, y);
MaxNumber (x, y, m);
MaxNumber (2, x+y, n);
writeln ('m=', m, 'n=', n);
end.
2).Аналогичную задачу, но уже с использованием функций, можно решить так:
var x, y, m, n: integer;
function MaxNumber (a, b: integer): integer;
var max: integer;
begin
if a>b then max:=a else max:=b;
MaxNumber:= max;
end;
begin
write ('Введите x, y ');
readln (x, y);
m:= MaxNumber (x, y);
n:= MaxNumber (2, x+y);
writeln ('m=', m, 'n=', n);
end.
Пример 5.
Пример описания процедуры, определяющей значение суммы двух комплексных чисел, представленных в алгебраической форме
Procedure CADD (Re1, Re2, Im1, Im2:real; var Re, Im:real);
begin
Re:=Re1+Re2;
Im:=Im1+Im2
end;
Пример 6.
Пример описания функции, вычисляющей сумму квадратов первых n натуральных чисел.
Function SN2 (n: integer): integer;
Var s, i: integer;
begin
s:=0;
for i:=1 to n do
s:=s+i*i;
SN2:=s
end;
Пример 7.
Программа вычисления значения интеграла по формуле средних прямоугольников.
Program INTEGRAL;
type FUNC=function (x:real):real;
Var a, b, w, eps:real;
function F (x:real):real; far;
begin
F:=sin(x)/(1+x*x)
end;
function INT (a, b, eps:real; F:FUNC):real;
Var i, n:integer;
x, h, S1, S2:real;
begin
n:=1;
h:=(b-a)/n;
S2:=F (a+h/2)*h; {первоначальное вычисление площади}
Repeat {цикл по уточнению площади}
S1:=S2; n:=2*n; h:=h/2;
S2:=0; X:=a+h/2;
for i:=1 to n do
begin
S2:=S2+F(x);
X:=x+h
end;
S2:=S2*h
until abs (S2-S1)<=eps;
INT:=S2
end;
{главная программа}
begin
write (`пределы интегрирования:'); readln (a, b);
write(`точность'); readln(eps);
w:=INT (a, b, eps, F);
writeln (`w=', w:10:4)
end.
Пример 8.
Описание функйии поиска «нуля» функции методом деления пополам.
function ZERO (F: FUNC; a, b, eps: real): real;
var x: real; q: boolean;
begin
q:=F(a)<0;
repeat
x:=(a+b)*0.5;
I if F((x)<0)=q then
a:=x
else b:=x
until abs (b-a)<eps;
ZERO:=x
End;
Литература
1. Фаронов В.В. «TurboPascal» Наиболее полное руководство в подлиннике.
2. Лалетин Н.В. «Процедуры и функции в языке TurboPascal». Учебное пособие.
3. Немнюгин С.А. «TurboPascal». Учебник.
4. Ускова О.Ф. «Программирование на языке Паскаль». Задачник.
5. М.М. Боженова, Л.А. Москвина. «Практическое программирование. Приемы создания программ на языке Паскаль».
6. Н.И. Амелина, Я.М. Русанова, А.А. Чекулаева. «Информатика. Задачи».
Размещено на Allbest.ru
Подобные документы
История создания и развитие Pascal. Особенности пакета программирования Turbo. его возможности редактора текстов, компилятора и отладчика. Построения программы на языке Turbo Pascal, ее структура, типы алгоритмов, одномерные и многомерные массивы.
курсовая работа [519,3 K], добавлен 25.06.2011История появления и распространения Turbo Pascal - среды разработки для языка программирования Паскаль. Общий вид объявления файлового типа. Входная, выходная и промежуточная информация. Алгоритм решения задачи: словесный алгоритм, блок-схема, программа.
курсовая работа [359,4 K], добавлен 05.01.2010История и основы структурного программирования в среде Turbo Pascal. Работа с различными типами данных. Операторы языка. Работа с символьными и строковыми переменами, одномерным, двумерным массивами. Классификация компьютерных игр. Игры на языке Паскаль.
курсовая работа [28,8 K], добавлен 06.05.2014Структура и основные элементы языка Turbo Pascal. Алгоритм составления простейших программ на Turbo Pascal. Применение условного оператора и сильноветвящихся алгоритмов. Циклы с предусловием и постусловием, сочетание циклических и условных операторов.
реферат [64,0 K], добавлен 20.03.2016Сущность среды программирования Turbo Pascal. Разработка программы с учетом потребительских свойств. Особенности методов современной технологии программирования (пошаговой детализации, структурный, модульный принцип, метод иерархической декомпозиции).
курсовая работа [57,1 K], добавлен 03.03.2011История создания и развитие языка программирования Pascal, его версии. Особенности и порядок построения графика функции на языке Turbo Pascal с использованием декартовой системы координат. Блок схема алгоритма процедур, листинг и тестирование программы.
курсовая работа [102,7 K], добавлен 23.12.2011Программирование на языке Паскаль: алфавит, решение задач, простейшие программы, разветвляющие программы, циклические программы, ввод-вывод, массивы, подпрограммы, строковые данные, записи, файлы, использование библиотеки CRT, графика в Паскале.
учебное пособие [211,1 K], добавлен 30.03.2008Понятие и содержание процедур и функций среды TP как логически самостоятельных фрагментов программы. Описание списка формальных параметров процедуры Pascal и преобразование подпрограммы в массив. Локализация имен и правила работы с модулями среды TP.
презентация [154,6 K], добавлен 10.10.2013Разработана программа решения двух задач на языке программирования Turbo Pascal. Спецификация задания. Описание входных и выходных данных. Математическая постановка задачи. Алгоритм ее решения. Описание и блок-схема программы. Результаты тестирования.
курсовая работа [275,8 K], добавлен 28.06.2008Разновидности и задачи подпрограмм в языке Турбо Паскаль, их локальные и глобальные параметры. Использование процедуры для выполнения законченной последовательности действий. Формат объявления функции, особенности рекурсивного оформления подпрограммы.
реферат [20,0 K], добавлен 08.02.2012
