Лабораторна робота № 2. Тема: інтегроване середовище turbo Pascal 7. 0.

Лабораторна робота № 1

Тема: Інтегроване середовище TURBO PASCAL 7.0.

Мета: Формування навичок і вмінь по роботі в інтегрованому середовищі Turbo Pascal 7.0.

Контрольні запитання:

1. Назвіть файл, яким завантажується інтегроване середовище Turbo Pascal.

2. Опишіть основні команди пункту меню File.

3. Як використовується пункт меню Edit?

4. Як здійснити компіляцію програми?

5. Як виконати програму?

6. Опишіть команди та їх функції пункту меню Windows.

Завдання.

1. Завантажити інтегроване середовище Turbo Pascal (TP).

2. Відкрити нове вікно.

3. У вікні набрати текст власної автобіографії.

4. Записати файл на домашній диск під ім¢ ям MY_BIOG.

5. Вийти із середовища TP.

6. Увійти в середовище TP, прочитати з домашнього диску файл MY_BIOG.PAS.

7. Відкрити вікно-2.

8. Із файла MY_BIOG у вікно-2 скопіювати рядки, де йдеться про дату і місце народження. Записати файл на домашній диск під ім¢ ям DATA.PAS.

9. Відкрити вікно-3.

10. Із файла MY_BIOG у вікно-3 скопіювати рядки, де йдеться про навчальний заклад, що закінчив студент. Записати файл на домашній диск під ім¢ ям ZOSH.PAS.

11. Відкрити вікно-4.

12. Із файла MY_BIOG у вікно-4 скопіювати рядки, де йдеться про місце навчання у даний час. Записати файл на домашній диск під ім¢ ям RDGU.PAS.

13. Вивести на екран список всіх відкритих вікон.

14. Розташувати на екрані всі вікна “мозаїкою”.

15. Закрити всі вікна.

16. Вийти із середовища Turbo Pascal.

Лабораторна робота № 2

Тема: Числові типи. Оператор присвоєння.

Мета: Формування необхідних навичок та вмінь по використанню операцій і вказівок мови Pascal. Формування вмінь та навичок по використанню оператора присвоєння.

Контрольні запитання:

1. Що таке константа? Як записуються константи? Як визначається тип константи?

2. Що таке змінна? Як позначається змінна? Як записується число?

3. Назвіть відомі вам типи числових даних і межі їх значень.

4. Які з наступних послідовностей символів є числами в мові Pascal:

a) 0 b) -5 c) 1/12 d) 3, 14 e) +7.7 f) 0.66… g) 4! i) 2.34E-01 j) VII

5. Що таке ідентифікатор?

6. Які із нижче вказаних послідовностей символів є ідентифікаторами, а які ні:

a)X b)X1 c)X¹ d)X1X2 e)abcd f)sin
g)sin x h)a-1 i)2a j)delta k)max15

7. Що таке оператор? Що таке операнд?

8. Назвіть стандартні функції мови Pascal і типи значень, які вони повертають.

9. Запишіть за правилами мови Pascal декілька варіантів виразу, значення якого рівне x⁴.

10. Як записується і виконується оператор присвоєння?

11. Як поміняти значеннями змінні X і Y?

12. Записати оператор присвоєння, який змінює знак значення змінної t.

13. Перевірити, чи є допустимим такий запис: x: =y+sin(sin(z)), якщо x, y, z: real.

14. Перевірити, чи є допустимим такий запис:

a: =(x< y) or b and (i< > k), якщо i, k: integer; x, y: real; a, b: boolean.

15. Перевірити, чи є допустимим такий запис:

x: =i+j-b, якщо i, j: integer; x: real; b: boolean.

Завдання 1. Чому рівні значення змінних X і Yпісля виконання вказівок присвоєння:

Варіанти:

1. 1) X: =2; Y: =5; X: =Y; Y: =X+Y;

2) X: =-6.3; Y: =-1.2; X: =-X*2+Y; Y: =-Y*2;

3) X: = 5; Y: =X-1; X: =-X; Y: =(Y+X)/2.

2. 1) X: =0.3; Y: =-0.2; X: =X+2*Y; Y: =Y/2;

2) X: =43.5; Y: =-2.4; X: =2*Y-X; Y: =-2*Y+2*X;

3) X: =-3; Y: =-2; X: =X/(2*Y); Y: =-Y.

3. 1) X: =-0.6; Y: =0.15; X: =-X+Y; Y: =Y*2;

2) X: =-7.5; Y: =0.8; X: =(-X+2)*Y; Y: =X-Y;

3) X: =0.2; Y: =3/2; X: =X+4*Y; Y: =Y+2.

4. 1) X: =3; Y: =-0.2; X: =X*Y; Y: =-Y; Y: =Y+1;

2) X: =1; Y: =1/3; Y: =Y*3-1; X: =-X;

3) X: =-1; Y: =X/5; X: =X+Y; Y: =-Y/2.

5. 1) X: =-2.5; Y: =-0.5; X: =-Y+X; Y: =Y+1;

2) X: =5.5; Y: =-0.5; X: =X+2; Y: =0.1-X;

3) X: =-10; Y: =5.2; X: =X+Y*3; Y: =-Y/2+X.

6. 1) X: =1/2; Y: =X*5; X: =X-Y; Y: =(X+Y)/2;

2) X: =-3; Y: =0.5; X: =4*X+2*Y; Y: =-Y;

3) X: =12; Y: =-2; X: =X-Y; Y: =Y-X.

7. 1) X: =-0.8; Y: =X-1; X: =X+Y-1; Y: =-Y/2;

2) X: =6; Y: =4; X: =X+Y; Y: =X-Y; X: =X-Y;

3) X: =5; Y: =-2; X: =3*Y-X; Y: =X-Y/2.

8. 1) X: =23; Y: =-3; X: =2*X+1; Y: =-Y+2*X;

2) X: =-12; Y: =0.2; X: =-(1-X); Y: =Y+X;

3) X: =2; Y: =-2; X: =X-Y; Y: =X-2*Y.

9. 1) X: =0.3; Y: =-0.2; X: =X+2*Y; Y: =Y/2;

2) X: =11; Y: =3; X: =-X; Y: =Y+X;

3) X: =-0.6; Y: =-0.1; X: =Y-X+2*X; Y: =-Y.

10. 1) X: =5.25; Y: =-5.25; X: =Y; Y: =X;

2) X: =-4; Y: =10; X: =(X+2)*Y; Y: =Y+1/4;

3) X: =25; Y: =2; X: =-X*Y; Y: =2*(X+Y).

11. 1) X: =-6.2; Y: =10; X: =-X-Y; Y: =-X+Y;

2) X: =6; Y: =-2; X: =X/Y; Y: =Y/X;

3) X: =-3; Y: =5.2; X: =-X+2; Y: =Y+2*Y.

12. 1) X: =12.4; Y: =0.2; X: =-X; Y: =Y/2+X; X: =X+1;

2) X: =-3; Y: =-5; X: =X+Y; Y: =-Y;

3) X: =0.5; Y: =21; X: =X+2; Y: =Y-2.

13. 1) X: =3.3; Y: =-2.5; X: =2*Y-X; Y: =1+Y/2;

2) X: =-4; Y: =2; X: =4-X; Y: =Y*2;

3) X: =-6; Y: =23; X: =5*X-Y; Y: =Y-X.

14. 1) X: =10.5; Y: =-100; X: =-X*Y; Y: =-Y/5;

2) X: =-0.9; Y: =0.1; X: =X-Y; Y: =Y*X;

3) X: =3; Y: =0.2; X: =X+2*Y; Y: =Y-(X-1).

15. 1) X: =1.5; Y: =3.5; X: =-X; Y: =-Y; Y: =X+Y;

2) X: =-3; Y: =-2; X: =(X+2)*Y; Y: =1+X+Y;

3) X: =0.6; Y: =-0.7; X: =X*Y-2; Y: =Y/2+X.

Завдання 2. Обчислити значення виразів:

Варіанти:

1. a) trunc (6.9) b) trunc (-6.9) c) trunc (0.5)

d) round (6.9) e) round (-6.9) f) round (-0.5)

2. a) trunc (5.6) b) trunc (-5.6) c) trunc (17.5)

d) round (5.6) e) round (-5.6) f) round (-17.5)

3. a) trunc (7.56) b) trunc (-7.56) c) trunc (2.6)

d) round (7.56) e) round (-7.56) f) round (-2.6)

4. a) trunc (2.62) b) trunc (-2.62) c) trunc (5.5)

d) round (2.62) e) round (-2.62) f) round (-5.5)

5. a) trunc (4.7) b) trunc (-4.7) c) trunc (2.51)

d) round (4.7) e) round (-4.7) f) round (-2.51)

6. a) trunc (1.8) b) trunc (-1.8) c) trunc (3.5)

d) round (1.8) e) round (-1.8) f) round (-3.5)

7. a) trunc (3.85) b) trunc (-3.85) c) trunc (4.51)

d) round (3.85) e) round (-3.85) f) round (-4.51)

8. a) trunc (12.6) b) trunc (-12.6) c) trunc (8.5)

d) round (12.6) e) round (-12.6) f) round (-8.5)

9. a) trunc (32.69) b) trunc (-32.69) c) trunc (18.52)

d) round (32.69) e) round (-32.69) f) round (-18.5)

10. a) trunc (3.63) b) trunc (-3.63) c) trunc (7.51)

d) round (3.63) e) round (-3.63) f) round (-7.51)

11. a) trunc (2.35) b) trunc (-2.35) c) trunc (4.54)

d) round (2.35) e) round (-2.35) f) round (-4.54)

12. a) trunc (6.9) b) trunc (-6.9) c) trunc (0.5)

d) round (6.9) e) round (-6.9) f) round (-0.5)

13. a) trunc (9.87) b) trunc (-9.87) c) trunc (2.57)

d) round (9.87) e) round (-9.87) f) round (-2.57)

14. a) trunc (11.54) b) trunc (-11.54) c) trunc (4.5)

d) round (11.54) e) round (-11.54) f) round (-4.5)

15. a) trunc (8.25) b) trunc (-8.52) c) trunc (6.52)

d) round (8.52) e) round (-8.52) f) round (-6.52)

Завдання 3. Обчислити значення виразів:

Варіанти:

1. a) 20 div 6 b) 20 mod 6 c) 2 div 5 d) 2 mod 5

e) 3*7 div 2 mod 7/3 – trunc (sin(1)) f) succ (round(5/2) – pred (3))

2. a) 21 div 5 b) 21 mod 5 c) 4 div 6 d) 4 mod 6

e) 15 mod 2*24 mod 7/3 + round (8.7) f) pred (12) + succ (trunc (5/2))

3. a) 15 div 6 b) 15 mod 6 c) 6 div 9 d) 6 mod 9

e) round (26/4) div 2/4 – 5 div 3 f) –18 mod 5 + 18 div 5*2

4. a) 73 div 2 b) 72 mod 2 c) 3 div 7 d) 3 mod 7

e) trunc (26/4) mod 2*5 + 10 div 3 f) 25 mod 7 + pred (25)*cos(0)

5. a) 19 div 6 b) 19 mod 6 c) 5 div 9 d) 5 mod 9

e) 17 div 5 – succ (12 mod 5) f) trunc (25.6)*2 div 10 + 25.6/2

6. a) 17 div 3 b) 17 mod 3 c) 3 div 5 d) 3 mod 5

e) 26 mod 4 + pred (round (34/4)) f) succ (-15/5) div 2 mod 2 + 4

7. a) 66 div 9 b) 66 mod 9 c) 5 div 7 d) 5 mod 7

e) 17 div 4*3 mod 4 + pred (7 div 3) f) 28 mod 5/3 + pred (round (8/4))

8. a) 27 div 13 b) 27 mod 13 c) 2 div 7 d) 2 mod 7

e) succ (succ(7)) f) pred ((-5) div 3)*(5 mod (-3))

9. a) 45 div 6 b) 45 mod 6 c) 6 div 8 d) 6 mod 8

e) pred (succ (pred (8))) f) trunc (10.5) – round (10.5)

10. a) 34 div 7 b) 34 mod 7 c) 3 div 7 d) 3 mod 7

e) pred (5 mod 2)*(5 div 2) f) pred (15 div 4) + sin(1)

11. a) 53 div 9 b) 53 mod 9 c) 4 div 9 d) 4 mod 9

e) succ (16 div 4) + pred (16 mod 4) f) trunc (49/7) + round (10 mod 4/6)

12. a) 11 div 2 b) 11 mod 2 c) 3 div 6 d) 3 mod 6

e) round (34/5*4) + succ (-7) f) pred(49/7 div 6*2)

13. a) 27 div 5 b) 27 mod 5 c) 2 div 8 d) 2 mod 8

e) pred (-10) – round (10 div 3*4.5) f) succ (10 div 3 mod 2*3)

14. a) 75 div 6 b) 75 mod 6 c) 1div 3 d) 1mod 3

e) trunc (24 mod 4/5) + round (7) f) pred (-34) mod 5 - 2

15. a) 47 div 9 b) 47 mod 9 c) 9 div 11 d) 9 mod 11

e) 23 mod 7*4 div 2 – trunc (-3.5) f) succ (18 div 4*4 – 3)

Завдання 4. Перевірити коректність виразу та визначити тип (цілий чи дійсний) результату обчислення виразу:

Варіанти:

1. a) 1+0.0 b) 20/4 c) sqr(4) d) sin(0) e) sqrt(16) f) trunc(-3.14)

2. a) sqrt(36.0) b) sqr(5.0) c) 2.5+5 d) 25.0/5 e) sin(p/2) f) succ(-2)

3. a) succ(4) b) sqrt(64) c) 2.67+5 d) 63/9.0 e) cos(1) f) round(34.67)

4. a) sqr(6.0) b) 25.0/5 c) cos(0) d) sqrt(81.0) e) 5+0.0 f) trunc(-2.82)

5. a) 36.0*(-1) b) succ(5) c) sqrt(-4) d) 34.0/(-2) e) cos(8) f) trunc(6.52)

6. a) succ(36.0) b) sqr(8.0) c) trunc(5.3) d) 5-4.25 e) round(0.5) f) pred(-2)

7. a) pred(36.0) b) succ(5.0) c) round(6.7) d) 34/5.2 e) sin(0) f) trunc (-2.9)

8. a) round (3.0) b) sqrt(5.0) c) 2.5*5 d) succ(6.5) e) trunc (0.5) f) pred(25.6)

9. a) sqrt(49) b) 5.0/2.0 c) pred(5) d) trunc(5.25) e) round (8.6) f) succ(-13.6)

10. a) succ(6) b) sqr(5) c) round(9.5) d) 2.5+6.5 e) pred(0) f) trunc (-1.5)

11. a) trunc (36.0) b) sqrt(144) c) succ(15.0) d) 18/9 e) round(6.8) f) pred(-5.0)

12. a) pred(32) b) sqr(-25) c) trunc(8.74) d) succ(-54) e) sin(1) f) round (-2.8)

13. a) sqrt(35) b) round (5.5) c) pred(-13) d) 12*2 e)succ(-5.0) f) trunc (-2.54)

14. a) succ(0.5) b) pred(8.0) c) 4+7.4 d) trunc(4.8) e) round (0.0) f) succ(-2)

15. a) trunc (6.0) b) sqrt(81) c) round(-0.7) d) pred(32.9) e) cos(p) f) succ(-0.5)

Завдання 5. Виконати наведене нижче завдання, використавши необхідні для цього операції і функції мови Pascal.

Вимоги до завдання:

- реалізація завдання має містити лише вказівки присвоєння.

Варіанти:

1. Присвоїти цілій змінній h третю від кінця цифру додатнього цілого числа k (наприклад, якщо k =130985, то h =9).

2. Присвоїти цілій змінній d першу цифру дробової частини додатнього дійсного числа x (наприклад, якщо x=32.597, то d=5).

3. Цілій змінній s присвоїти суму цифр трицифрового цілого числа k (наприклад, якщо k=645, то s=6+4+5).

4. Присвоїти цілій змінній m четверту від кінця цифру додатнього цілого числа n (наприклад, якщо n =130985, то m=0).

5. Присвоїти цілій змінній g другу цифру дробової частини додатнього дійсного числа r (наприклад, якщо r=32.597, то g=9).

6. Цілій змінній f присвоїти добуток цифр чотирицифрового цілого числа k (наприклад, якщо k=1645, то f= ).

7. Присвоїти цілій змінній m другу від кінця цифру додатнього цілого числа a (наприклад, якщо a =1385, то m=8).

8. Цілій змінній s присвоїти суму цифр п¢ ятицифрового цілого числа k (наприклад, якщо k=51645, то s=5+1+6+4+5).

9. Присвоїти цілій змінній h суму третьої та четвертої від кінця цифр додатнього цілого числа k (наприклад, якщо k =130985, то h =9+0).

10. Присвоїти цілій змінній d добуток першої та другої цифр дробової частини додатнього дійсного числа x (наприклад, якщо x=32.597, то d= ).

11. Змінній s присвоїти суму першої та другої від кінця цифр, поділену на третю від кінця цифру трицифрового цілого числа k (наприклад, якщо k=645, то s=((5+4)/6).

12. Присвоїти цілій змінній h суму четвертої та другої від кінця цифр додатнього цілого числа k (наприклад, якщо k =130985, то h =0+8).

13. Цілій змінній s присвоїти різницю третьої та першої від кінця цифр п¢ ятицифрового цілого числа k (наприклад, якщо k=51645, то s=6-5).

14. Присвоїти цілій змінній j другу від кінця цифру додатнього цілого числа a (наприклад, якщо a =8563, то j=6).

15. Присвоїти цілій змінній w суму третьої та четвертої від кінця цифр додатнього цілого числа c (наприклад, якщо c =136785, то w =7+6).