Практична частина

8

Використовуючи переліковний тип даних, що визначає дні тижня, розв‘язати завдання: дано день тижня з‘ясувати чи вихідний це день.

9

Перший член послідовності рівний 0, другий 1, а кожен наступний, починаючи з третього обчислюється за формулою: . Дано натуральне n, знайти a_n.

10

Дано текстовий файл T. Знайти кількість рядків, що починаються цифрою.

1

Визначити результат операції присвоєння x:=k:

var k:string; x:char;

begin k:='A'; x:=k; end.

1. 'ABC'; 2. 'A'; 3. операція не допустима;

2

Яка операція у виразі буде виконана першою:

1. *; 2. -; 3. /; 4 +;

3

Після виконання фрагменту коду:

x:=1; y:=3; if x > 0 then begin if y < 0 then y:=-1 end else y:=2;

значення змінної y буде дорівнювати

1. 3; 2. 2; 3. -1;

4

Яким буде останнє значення лічильника в циклі while.

i:=0; while i<10 do begin writeln(i); inc(i); end;

1. 8; 2. 9; 3. 10;

5

Який тип елементу масиву типу TArray:

Type TArray = array[1..10] of char;

1. масив; 2. char; 3. integer;

6

Скільки параметрів значень визначено у заголовку підпрограми:

function Func(const x,y:real; var z:string):real;

1. 1; 2. 0; 3. 3;

7

У бінарне дерево пошуку, вузли якого зберігають цілі значення, послідовно додаються значення: 10, 80, 40, 10, 20, 10. Скільки вершин містить дерево.

1. 6; 2. 5; 3. 4;

8

Використовуючи переліковний тип даних, що визначає дні тижня, розв‘язати завдання: дано день тижня надрукувати символьну назву цього дня.

9

Перший член послідовності рівний 1, другий 0.1, а кожен наступний, починаючи з третього обчислюється за формулою: . Дано натуральне n, знайти b_n.

10

Дано текстовий файл T. Знайти кількість рядків, що починаються малою латинською літерою.

1

Визначити результат операції присвоєння x:=k:

var k:string; x:integer;

begin k:='123'; x:=k; end.

1. '123'; 2. 123; 3. операція не допустима;

2

Яка операція у виразі буде виконана першою:

1. *; 2. -; 3. /; 4 +;

3

Після виконання фрагменту коду:

x:=-1; y:=-2; if x > 0 then begin if y < 0 then y:=-1 end else y:=2;

значення змінної y буде дорівнювати

1. -2; 2. 2; 3. -1;

4

Яким буде останнє значення лічильника в циклі while.

i:=1; while i<=10 do begin writeln(i); inc(i); end;

1. 8; 2. 9; 3. 10;

5

Який тип елементу масиву типу TArray:

Type TArray = array[1..10] of array[1..2] of char;

1. масив; 2. char; 3. integer;

6

Скільки локальних змінних визначено у підпрограмі:

procedure Proc(x:real);

var y:real; const z=10; var s:string;begin end;

1. 1; 2. 0; 3. 2;

7

У бінарне дерево пошуку, вузли якого зберігають цілі значення, послідовно додаються значення: 30, 20, 40, 50, 10, 25. Яке значення буде у крайньої лівої кінцевої вершини дерева.

1. 10; 2. 20; 3. 30;