Тема: TurboPascal. Лінійні алгоритми і програми.
Мета: Формування умінь створення лінійних алгоритмів і програм на алгоритмічній мові високого рівня Turbo Pascal.
Теоретичні відомості
Лінійною називається програма, в якій всі оператори виконуються послідовно один за одним.
Структура лінійної програми складається із:
– заголовка program <ім’я програми>;
– розділів описової частини:
– uses - приєднання бібліотек та модулів;
– label - оголошення міток (позначок);
– const - оголошення сталих;
– type - опис типів;
– var - оголошення змінних;
– procedure - оголошення процедур;
– function - оголошення функцій користувача;
– виконуваної частини: begin
<розділ команд>;
End.
Розділ команд складається з команд присвоєння, введення аргументу чи аргументів, обчислення значень функції за заданими залежностями і виведення результатів обчислень.
При складанні Turbo Pascal програм необхідно:
- скласти графічний алгоритм;
- виконати ідентифікацію змінних;
- скласти програму мовою Pascal, передбачивши введення аргументу і виведення проміжних результатів обчислень, значення аргументу та функції;
- налагодити програму;
- розв’язати задачу на ЕОМ в діалоговому режимі.
Варіант завдання студент отримує згідно з порядковим номером списку групи журналу викладача.
Хід роботи
Порядок виконання лабораторних робіт по вивченню мови Turbo Pascal проводити за розділами, наведеними нище.
2.1 Постановка задачі
Скласти графічний алгоритм і програму для обчислення функції:
Значення сталих величин: f=1863,4; r1=61,4; r2=4,51; Q=2,1.105.
Значення аргумента: =4,173.
2.2 Графічний алгоритм наведений на рис. 5. 1.
2.3 Таблиця ідентифікації змінних
Змінна | Ідентифікатор |
g r1 r2 p f | G R1 R2 P рі Q P1 F |
2.4 Програма мовою Pascal та результати обчислень
Program LP{лінійна_програма};
Const
f=1863.4;R1=61.4;R2=4.51;Q=210000;pi=3.14;
Var P,P1,G:real;
Begin
write('Введіть аргумент ');
read(P1);
P:=F/(pi+sqr(R1));
G:=Q*sqrt(P/P1)*ln(R1/R2);
writeln('Результати обчислень: ');
write('P1=',P1:6:3,' P=',P:6:3,' G=',G:8:3);
end.
Введіть аргумент 4.173
Результати обчислень:
Р1=4.173 Р=0.494 G=188636.011
Рисунок 5.1 – Графічний алгоритм
3 Контрольні запитання
1. Для чого призначена команда READ
2. Для чого призначена команда WRITE?
3. З яких розділів складається програма мовою Pascal?
4. В якому розділі описують сталі?
5. В якому розділі описують змінні?
6. Які є типи змінних?
Варіантів завдань наведені в таблиці 5.1.
Таблиця 5.1 –Варіанти завдань
№ ва- ріан-ту | Функція | Аргу- мент | Значення аргумента |
; ; R=4,21; g=3; =11,6; Q=89,52 | x | 2,456 | |
; ; =4,215; =26,35; C=6,28; dk=8,351; b= -12,6 | x | 2,456 | |
; f=21,85; x=31,3; =9,06; T=161,58 | t | 1,362 | |
; A=18,365; =2,1; =6,28; =6,31 | t | 2,035 | |
; ; U1=120; U2=63,5; =1.86; R1=15; R3=4,8 | R2 | 8,75 |
Продовження таблиці 5.1
n=12; g=22,68 | x | 2,863 | |
; ; x=3,141 | /10 | ||
; =1,48; x=3,685 | p | 1,46 | |
; N=8; L=4206,5; Qn=6250; =2,83; k=0,82 | 1,59 | ||
=1.25;Q=0.762; L=405; C=13.856; =83 | B1 | 4,35 | |
; I=0,36; q=9,81; G=35,68 | |||
; a=3,65; z=4,83; =11,862 | r | 24,5 | |
; U1=12,3; T2=3,856; n0=840; n1=610 | k | 1,485 |
Продовження таблиці 5.1
; ; =150; x=2,8 рад. | |||
C=161,5; =550 | k | 1,65 | |
; a=465; ; t=0,15 | |||
w=700; L=0,1; R=32,5; Um=320,4 | t | 0,225 | |
T=20,86; a=0,015; w=20 | Z | 321,8 | |
P1=8,564; P2=4,116; =0,156; d=4,5; g=9,81; =1,262 | g | 1,21 | |
p=1,105; S=2,6; f=285,1; r=0,328; =12,86 | l | 362,5 | |
=1,63; c1=15,65; c2=8,21; T1=1,265; T2=2,035 | x | 0,65 |
Продовження таблиці 5.1
x=-0,355; t=2,608; | k | ||
D=0,865; d=0,532; g=9,81; ; =1,63 | h | 245,6 | |
f=1863,4; r1=61,4; r2=4,51; Q=2,105 | | 4,173 | |
d=-1,735; =3,06; B=10,5 | A | 6,35 |