Звіт повинен бути оформлений державною мовою.

Література:[10] c. 46-54, [17] c. 173-190

 

Тестові питання для самоконтролю.

1. Яке службове слово використовується в операторі циклу FOR, щоб вказати на ЗРОСТАННЯ параметра циклу?

a. To

b. Do

c. Dawnto

d. While

2.Змінні яких ТИПІВ можуть бути параметрами циклу FOR ?

 

1 дійсного типу

2 цілого типу

3 комплексного типу

4 символьного типу

 

Запишіть НОМЕР (або – через кому – НОМЕРИ) правильних відповідей.

a. Немає правильної відповіді

b. Всі

c. 1,2

d. 1,2, 4,

3.Наведений оператор записано неправильно!

 

do while x>=0.5 x:=x*0.1; Запишіть його без помилок.

a. while x>=0.5 do x:=x*0.1;

b. x>=0.5 while do x:=x*0.1;

c. do x>=0.5 while x:=x*0.1;

d. while x>=0.5 ; x:=x*0.1do

4.Скільки разів буде виконано цикл у фрагменті i=0;

while (i<5) do i:=i+1;

a. 5

b. Ні одного разу

c. 3

d. 4

 

5.Яке ЗНАЧЕННЯ матиме змінна S після виконання операторів s:=0.9;

for i:= – 10 to – 6 do s:=s+1;

a. 0,9

b. 5,9

c. Це неможливо

d. 7

6.Яке ЗНАЧЕННЯ матиме змінна S після виконання операторів s:=0.5;

i:=0;

while (i<5) do i:=i+1;

s:=s+1/i;

a. Це неможливо

b. 0,5

c. 5,5

d. 4,5

 

7.Яке ЗНАЧЕННЯ матиме змінна S після виконання операторів s:=2.1;

i:=2;

repeat i:=i–1; s:=s*i

until (i<=3);

 

a. 5

b. 2,1

c. 6

d. Немає вірної відповіді

8. При яких умовах буде коректно виконуватися наступний код? Змінну Lst думаємо, що вказує на коректно створений об'єкт типу TStringList.

var
I: Cardinal;
Lst: TStringList;
...
for I := 0 to Lst.Count – 1 do
// Щось робимо з Lst[I]

 

a. Тільки якщо Lst.Count <> 0

b. Тільки якщо Lst.Count = 0

c. Завжди коректно

d. Завжди некоректно

9. Э код програми. Скільки разів буде виконане тіло циклу, перш ніж він завершиться?

var
R: Double;
begin
R := 1.0;
repeat
R := R – 0.1;
until R = 0;

end.

a. 10

b. 11

c. Цей цикл ніколи не завершиться

d. Дуже багато, тому що цикл завершиться виключенням EOverflow, коли R досягне значення -1.7e308 (нижня границя типу Double)

10. У якому з операторів допущена синтаксична помилка:

1. For i=1 to 20 do p:=p+1;

2. While s<3 do s:= s-3;

3. Repeat k:=k+1 until k<7;

4. For I:=10 downto 5 do p:=p+1;

a. 1

b. 2

c. 3

d. 4

 

Практична робота №14

Тема: Створення і використання підпрограм користувача та вбудованих процедур і функцій.

Мета: вивчити можливості DELPHI для написання підпрограм і створення модулів. Навчитися створювати ы налагоджувати програму, що використовує зовнішній модуль UNIT з підпрограмою.