Поделиться
Л3-0025368.docx
ПРОГРАММИРОВАНИЕ ПОСЛЕДОВАТЕЛЬНЫХ ВЫЧИСЛЕНИЙ
Цель работы: научиться составлять программы на языке Pascal для программирования последовательных вычислений и освоить работу с систе- мой программирования Pascal ABC (или Borland Pascal).
Оборудование: персональный компьютер типа IBM PC с процессором не ниже Intel Pentium I.
Дидактический материал: плакаты, раздаточный материал.
Элементы языка Pascal
Программа на языке Pascal включает: заголовок программы (Program), раздел описания используемых модулей (Uses), раздел опи- сания меток (Label), раздел описания констант (Const), раздел описа- ния типов данных (Type), раздел описания переменных (Var), раздел описания процедур (Procedure), раздел описания функций (Function), раздел операторов (Begin…End.).
К стандартным типам данных в языке Pascal относятся: целочисленный
тип integer (целые числа), вещественный тип real (действительные числа), логический тип boolean (логические выражения), символьный тип char (отдельные символы), строковый тип string (строки симво- лов).
В языке Pascal используются следующие операторы (управляющие ин- струкции): составной оператор begin…end (начало…конец), оператор при- сваивания …:=… (…присвоить…), операторы ввода read(…) (считы- вать) и readln(…) (считывать до новой строки), операторы вывода write(…) (записывать) и writeln(…) (записывать до новой строки), оператор безусловного перехода goto… (перейти к…), оператор условного перехода (условный оператор) if…then…else… (если…то…иначе…), опера- тор варианта (выбора) case…of…else…end (в случае…из…иначе…конец), оператор цикла с предусловием while…do… (пока…делать…), оператор цикла с постусловием repeat…until… (повторять…пока…), операторы цикла с параметром for…:=…to…do… (для…от…до…делать…) и for…:=…downto…do… (для…от…вниз до…делать…), оператор присоедине- ния with…do… (с…делать…).
Операции и функции в языке Pascal
В языке программирования Pascal используются следующие операции:
арифметические операции + (сложение);- (вычитание); * (умножение);
/ (деление); div (целочисленное деление); mod (остаток от деления);
операции сравнения = (равно); <> (не равно); > (больше); < (меньше);
>= (больше или равно); <= (меньше или равно); логические операции
and (логическое «и»); or (логическое «или»); not (логическое «не»).
Среди арифметических операций сначала выполняются умножение и деление, а потом сложение и вычитание. Порядок выполнения операций можно изменить с помощью круглых скобок.
Пример 1.
|
Математическая запись |
Запись на Паскале |
|
a + bc |
(2) (1) a+ b * c |
|
a - b
cd |
(1) (3) (2) (a- b)/(c * d) |
В
языке Pascal используются следующие математические функции и выражения:
|
Математическая запись |
Запись на Паскале |
|
sin x |
sin(x) |
|
cos x |
cos(x) |
|
arctg x |
arctan(x) |
|
x |
abs(x) |
|
ln x |
ln(x) |
|
ex |
exp(x) |
|
x 2 |
sqr(x) |
|
x |
sqrt(x) |
|
ab = eb×lna |
exp(b*ln(a)) |
|
1 ×lna b a = eb |
exp(1/b*ln(a)) |
|
log b = ln b a ln a |
ln(b)/ln(a) |
|
lg x = ln x ln 10 |
ln(x)/ln(10) |
|
tg x = sin x cos x |
sin(x)/cos(x) |
|
ctg x = cos x sin x |
cos(x)/sin(x) |
|
sin x2 |
sin(sqr(x)) |
|
sin 2 x |
sqr(sin(x)) |
|
Константа p = 3,14… |
pi |
Среди других стандартных
функций в языке Pascal наиболее часто применяются: round (округление числа), trunc (целая
часть числа), frac (дробная часть
числа), random (случайное число), odd (проверка
нечётно- сти), ord (порядковый номер аргумента), chr (символ с заданным
порядко-
вым номером), pred (предшествующее значение аргумента), succ (после- дующее значение аргумента).
Порядок выполнения
|
1. Если это необходимо, зайти в Windows. |
– |
||||||
|
2. Загрузить систему программирования Borland Pascal (или Pascal ABC). |
Пуск ►(Мой) Компьютер, Ú Apps (G:), Ú BP, Ú BIN, Ú BP (или Ú Borland Pascal, ОК , найти свою папку, ОК , |
||||||
|
|
ОК |
). |
|||||
|
3. Закрыть окно и создать новый пустой файл. |
Window ►Close (Окно ►Закрыть), File ►New (Файл ►Новый). |
||||||
|
4. Набрать программу на языке Pascal для решения следующей задачи № 1: Вычислить с = a + b . |
Набрать 1-ю программу (см. примеры про- грамм). |
||||||
|
5. Задать диск и папку для хранения фай- лов. |
File ►Change dir (Файл ►Сменить директорию), Ú Drives, Ú (H:), Ú на папках преподавателя и |
||||||
|
группы, Ú на своей папке, |
ОК |
. |
|||||
|
6. Сохранить программу в файле. |
File ►Save as (Файл ►Сохранить как), ввести |
||||||
|
имя файла, |
ОК |
. |
|||||
|
7. Проверить программу на ошибки (т.е. сделать компиляцию программы). |
Compile ►Compile (Компиля- ция ►Компилировать) (или [Alt]+[F9]), ¿, испра- вить ошибку, далее аналогично. |
||||||
|
8. Запустить программу на выполнение и задать исходные данные ( a = 3 и b = 5 ; a = 138 и b = 714 ). |
Run ►Run (Выполнение ►Выполнить) (или [Ctrl]+[F9]), ввести 1-е число, | |, ввести 2-е число, ¿, далее аналогично. |
||||||
|
9. Просмотреть результат, показать пре- подавателю и записать полученный от- вет. |
Debug ►User Screen (Отладка ►Экран пользо- вателя) (или [Alt]+[F5]), записать информацию, ¿. |
||||||
|
10. Сохранить ещё раз программу. |
File ►Save (Файл ►Сохранить) (или [F2]). |
||||||
|
11. Аналогично набрать программу для решения задачи № 2: Ввести и вывести значения переменных a, b, с с использованием разных опера- торов ввода и вывода. |
Выполнить п. 3, набрать 2-ю программу. |
||||||
|
12. Изменить программу так, чтобы на экране отображался пояснительный текст при вводе и выводе. Далее полу- чить ответ в задаче № 2 (при a = -1; b = 0,00008 ; c = 1730 ). |
Изменить программу, выполнить пп. 5-10. |
||||||
|
13. Аналогично набрать программу для решения задачи № 3: V 0,2 + c Найти величину F = , где ка- a тет треугольника a = c2 - b2 , а объ- ем шара V = 4 p R3 . 3 |
Выполнить п. 3, набрать 3-ю программу. |
||||||
|
14. Изменить программу так, чтобы на экране ответ занимал 7 позиций c 2 цифрами в дробной части. Далее полу- чить ответ в задаче № 3 (при b = 1; c = 2 ; R = 3). |
Изменить программу, выполнить пп. 5-10. |
|
15. Выйти из системы программирования. |
File ►Exit (Файл ►Выход) (или [Alt]+[X]). |
Примеры программ на языке Pascal
|
1-я программа |
Объяснение каждой строки |
||
|
Program Lab6a; |
|
Программа по имени lab6a |
|
|
Var |
|
Раздел описания переменных |
|
|
a,b,c:real; |
|
Переменные a, b, c – вещественного типа |
|
|
Begin |
|
Начало раздела операторов (или начало состав- ного оператора) |
|
|
writeln('Введите a,b'); |
Вывод пояснительного текста 'Введите a,b' |
||
|
read(a,b); |
|
Ввод переменных a, b |
|
|
c:=a+b; |
|
Переменной c присваивается значение выра- жения a+b |
|
|
writeln('c=',c:10:3); |
|
Вывод пояснительного текста 'c=' и числового значения переменной c, занимающего 10 позиций, в т.ч. 3 цифры после запятой |
|
|
End. |
|
Конец раздела операторов и программы |
|
|
2-я программа |
|
||
|
Program Lab6b; |
|||
|
Var |
|||
|
a,b,c:integer; |
|||
|
Begin |
|||
|
read(a); |
|||
|
readln(b); |
|||
|
read(c); |
|||
|
write(a); |
|||
|
writeln(b); |
|||
|
write(c); |
|||
|
End. |
|||
|
3-я программа |
|
||
|
Program Lab6c; |
|
|
|
|
Var |
|
|
|
|
a,b,c,R,V,F:real; |
|
|
|
|
Begin |
|
|
|
|
writeln('Введите b,c,R'); |
|
||
|
read(b,c,R); |
|
|
|
|
a:=sqrt(sqr(c)-sqr(b)); |
|
||
|
V:=4/3*pi*R*R*R; |
|
|
|
|
F:=(exp(0.2*ln(V))+c)/a; |
|
||
|
writeln('F=',F); |
|
|
|
|
End. |
|
|
|
Дополнительное задание
1. 
Вычислить z = x y
5
1 - 2sin x2
,
3,41 + arctg2 y
ep 8
где y
= ln ( x + lg 20) -
, a = cos .
9
 |
2 ctg 3
2. Вычислить Y = lg(b + x3 - x4
+ 7)+
cos2 p
4
5
+ 
tg p
8
+ b-2a ,
где b = log 2 30 ,
a = sin e10.
Контрольные вопросы
1. Какие разделы включает программа на языке Pascal? Как они обозначают- ся?
2. Какие типы данных в языке Pascal являются стандартными? Как они обозначаются?
3. Какие операторы используются в языке Pascal? Какой вид они имеют и что означают?
4. Какие операции имеются в языке Pascal? Какой приоритет они имеют? Приведите примеры.
5. Какой синтаксис имеют стандартные математические функции и константа
p? Приведите примеры.
6. Как зайти в систему программирования и выйти оттуда? Как создать но- вый файл и закрыть окно?
7. Как проверить программу на ошибки и запустить её на выполнение? Как просмотреть ответ и сохранить программу?
8. Напишите программу к одной из задач дополнительного задания.
Материалы на данной страницы взяты из открытых источников либо размещены пользователем в соответствии с договором-офертой сайта. Вы можете сообщить о нарушении.
