Алгоритмы вычисления сумм конечных и бесконечных функциональных рядов

Задание_5_9_1 (7)

A После выполнения фрагмента программы

 

S:= 0; P:= 1; F:= 1;

For k:=0 To N Do

Begin

S:= S + P * (k + 1) / F;

P:= - P;

F:= F * (k + 1);

End;

 

переменная S будет содержать величину:

 

1)

2)

3)

4)

5)

 

(3)

 

Структурированные типы данных. Строки

Задание_5_10_1 (7)

A После выполнения фрагмента программы

 

S:= 'fbh hyu hjk i';

while pos ('h', S) <> 0 do

delete (S, pos ('h', S), 1);

 

переменная S примет значение

1) ’fbhhyuhjki’

2) ’fb yu jk i’

3) ’fbyujki’

4) ' '

5) ’fb yu hjki’

 

(2)

A Задан массив строк, состоящий из элементов

a[1] = ’ABC’, a[2] = ’abcd’,

a[3] = ’Abc’, a[4] = ’ABCD’, a[5] = ’Abcd’.

После выполнения фрагмента программы

 

for i:= 1 to 4 do

for j:= i + 1 to 5 do

if a[ i ] < a[ j ] then

begin c:= a[ i ];

a[ i ]:= a[ j ];

a[ j ]:= c;

end;

элемент а[2] равен

 

1) ’ABC’ 2) ’abcd’ 3) ’Abc’ 4) ’abcd’ 5) ’Abcd’

(5)

 

A После выполнения фрагмента программы

 

S:= 'fbh hyu hjk i';

while pos (copy(s,3,1), S) <> 0 do

delete (S, pos (copy(s,3,1), S), 1);

 

переменная S примет значение

 

1) 'fb'

2) 'fb hyu hjk i'

3) 'fb yu hjk i'

4) ' '

5) 'fb yu jk i'

 

(1)

 

A После выполнения фрагмента программы

 

S:= 'fbh hyu hjk i';

insert(copy(s,5,3),s,pos(copy(s,length(s),1),s));

 

переменная S примет значение

1) 'fbh hyu hyu hjk i'

2) 'fbh hyuhyu hjk i'

3) 'fbh hyu hjk hyui'

4) 'fbh hyu hjk hyu i'

5) 'fbh hyu hjk ihyu'

(3)

Структурированные типы данных. Файлы

Задание_5_11_1 (10)

A Укажите соответствие между названием процедуры работы с текстовыми файлами и ее назначением (Var F: TextFile;)

А. AssignFile(F,’N_1’)	1. Создает новый файл и открывает его на запись
B. Rewrite(F)	2. Устанавливает соответствие между файловой переменной и именем файла на диске
C. Readln(F, N_1)	3. Открывает файл для дозаписи
D. Append(F)	4. Считывает из файла значение в переменную N_1 и переходит к новой строке

 

1) A – 2, B – 1, C – 4, D – 3

2) A – 1, B – 2, C – 3, D – 4

3) A – 3, B – 1, C – 4, D – 2

4) A – 2, B – 4, C – 1, D – 3

 

(1)

A Алгоритм чтения из текстового файла массива A[1..3, 1..3] содержит блоки

 

A.	AssignFile(F,’A’);
B.	for i:=1 to 3 do
C.	end;
D.	Read(F,A[i,j]);
E.	Readln(F);
F.	for j:=1 to 3 do
G.	CloseFile(F);
H.	Begin
I.	Reset(F);

 

в следующем порядке

 

1) A H F D E I B C G

2) A E F D H I G C B

3) H F D E I A G C B

4) A H F D E I G B C

5) A I B H F D E C G

 

(5)

Процедуры и функции

Событийные

Задание_5_12_1 (6)

С Дан код программы

 

var

Form1: TForm1;

x,y:byte;

implementation

 

{$R *.dfm}

 

procedure TForm1.Button1Click(Sender: TObject);

begin

X:= X + 1;

Y:= Y + 2;

end;

 

procedure TForm1.Button2Click(Sender: TObject);

begin

X:= X + 2;

Y:= Y + 1;

end;

 

procedure TForm1.Button3Click(Sender: TObject);

begin

X:= 1;

Y:= 2;

end;

 

procedure TForm1.Button4Click(Sender: TObject);

begin

Edit1.Text:= inttostr(X + Y);

end;

после последовательного нажатия кнопок Button3, Button1, Button2, Button4 на форму будет выведено ____.

(9)

 

Пользовательские

Вызов процедур и функций. Фактические параметры и формальные параметры

Задание_5_12_2 (7)

А Представлена процедура

 

procedure S(x, y: integer; var d: integer);

Begin

while x <> y do

if x > y then x:= x – y else y:= y – x;

d:= x;

end;

 

После выполнения в основной программе операторов

 

a:= 98; b:= 42;

S(a, b, x);

x:= a + b + x;

 

значение переменной x равно

 

1) 42 2) 126 3) 154 4) 70 5) 14

 

(3)

 

Задание_5_12_3 (5)

С Дан код программы

 

Function F(a,b,c:byte):byte;

begin

if (a > b) and (a > c) then

F:=a

else

If b > c then F:=b else F:=c;

end;

 

procedure TForm1.Button1Click(Sender: TObject);

var

x,y,z,d: byte;

begin

x:=8;

y:=2*x - 7;

z:=x + y - 11;

d:=F(y,x,z);

edit1.Text:= inttostr(d);

end;

после нажатия кнопки Button1на форму будет выведено ____.

(9)

Задание_5_12_4 (4)

В В программе описаны переменные и процедура

 

var u, v, x, y: integer;

procedure A(u, v: integer; var x, y: integer);

 

Из представленных операторов вызова процедур

 

1) A(x, y, u, v);

2) A(x+1, y*5, u, v);

3) A(5, u, x, v);

4) A(x, v, u, y-1);

5) A(x, y, u, 4);

 

допустимо использовать

 

(1, 2, 3)

Правила локализации переменных

Задание_5_12_4 (6)

А Дан код программы

 

procedure A(u, v: integer; var y: integer);

var x: integer;

begin

y:= u + v;

x:= y - 5;

u:= x * 2;

end;

 

procedure TForm1.Button1Click(Sender: TObject);

var u, v, x, y: integer;

begin

x:= 4; y:= 2;

A(x, y, u);

end;

 

После выполнения событийной процедуры переменные примут значения

 

1)	u = 6	2)	u = 6	3)	u = 2	4)	u = 4	5)	u = 6
	v = 2		v = 0		v = 0		v = 0		v = 2
	x = 1		x = 4		x = 1		x = 4		x = 4
	y = 4		y = 2		y = 6		y = 2		y = 4

 

(2)

 

 

Рекурсивные функции

С Задана функция пользователя

 

Function F(n:byte):byte;

begin

if (n = 1) then F:=1

else F:=n*F(n-2);

end;

 

Значение f(5) равно

(15)

ТЕМА 6. ТЕХНОЛОГИИ ПРОГРАММИРОВАНИЯ

Этапы решения задач на компьютере

Структурное программирование

ООП

Задание_6_3_1 (4)

 

A Установите правильное соответствие между названиями принципов объектно-ориентированного программирования и их описаниями

 

 

1) A – 2, B – 3, C – 1

2) A – 1, B – 3, C – 2

3) A – 3, B – 2, C – 1

4) A – 2, B – 1, C – 3

5) A – 3, B – 1, C – 2

(1)

Интегрированные среды программирования

 

ТЕМА 7. ЯЗЫКИ ПРОГРАММИРОВАНИЯ ВЫСОКОГО УРОВНЯ

Структуры и типы языков программирования

Задание_7_1_1 (10)

 

A Укажите соответствие между названием языка программирования и его типом

 

1) A – 3, B – 4, C – 1, D – 2

2) A – 1, B – 2, C – 3, D – 4

3) A – 3, B – 1, C – 4, D – 2

4) A – 2, B – 4, C – 1, D – 3

 

(1)