Тест Программирование ФДО ТУСУР (Решение → 16241)

Тест Программирование ФДО ТУСУР, Оценка Зачет. Сайт

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

Список вопросов:

Вопрос 1

Дан фрагмент программы:

Type aaa = record a, b: integer; c: char; end;

Var z: aaa;

Выберите строки, в которых есть ошибки обращения к записи.

With z do begin a:=25; b:=25+8; c:='c'; end;

With z do begin a:=2; b:=true; c:=succ('c'); end;

z.a:=1; z.b:=z.a*8; z.c:='+';

With z do a:=25; b:=2+8; c:=succ('x');

Вопрос 2

Дана рекурсивная функция:

Function f (n: integer): integer;

Var s: integer;

Begin

s:=1;

if n=0

then f:=1

else f:=s*a[n];

end;

Какую задачу решает эта функция?

Находит произведение n элементов массива.

Находит сумму натуральных чисел до n.

Находит факториал числа n.

Эта функция не является рекурсивной.

Находит произведение n чисел Фибоначчи.

Вопрос 3

Даны описания:

Var a,b:integer; c,d:real;

procedure obmen(a:integer; b:integer);

Var s:integer;

Begin

s:=a; a:=b; b:=s;

end;

Выберите строку с ошибкой применения данной процедуры.

Obmen(d,b);

Obmen(a,round(c));

Obmen(b-4,b+7);

Obmen(round(c),a mod 10);

Obmen(trunc(d),b);

Вопрос 4

Дан фрагмент программы:

b:=8; k:=1; a:=2;

Repeat

k:=k*a;

Until k>b;

Writeln(k);

Что будет выведено на экран?

Ответ:

Вопрос 5

Выберите составные типы данных.

Set

Char

Pointer

Procedure

Byte

File

Function

Single

Array

Вопрос 6

Выберите строки, в которых множества описаны с ошибками.

A: set of real;

A: set of integer;

A: set of boolean;

A: set of 2.7..5.9;

A: set of char;

Вопрос 7

Дана программа:

Var a,b,c,d:integer;

Function sum(a,b:integer):integer;

Var s:integer;

Begin

a:=a+2; b:=b+1;

s:=a+b;

sum:=s;

End;

Begin

a:=3; b:=5; c:=12; d:=10;

writeln(sum(c,d));

end.

Что будет выведено на экран в результате выполнения программы?

Вопрос 8

Типичное представление целых чисел в Паскале осуществляется с помощью типа данных:

Integer

Boolean

Real

Char

Вопрос 9

Очередью называется линейный список, в котором:

все включения и исключения производятся в произвольной позиции списка

все включения производятся на одном конце списка, а все исключения – на другом конце

все включения и исключения делаются в одном конце списка

Вопрос 10

Если параметры процедуры относятся к файловому типу, они могут быть:

исключительно параметрами–значениями

как параметрами–значениями, так и параметрами–переменными

исключительно параметрами–переменными

Вопрос 11

Выберите строку, в которой обращение к элементу массива неверно.

A(2)

A[5-1]

A[3+2]

A[2]

A[2*3]

Вопрос 12

Дана программа:

var i: integer; s: string;

begin

i:=278;

str (i, s);

writeln (s);

end.

Что будет выведено на экран?

Вопрос 13

Что будет выведено на экран после выполнения программы?

type dvig = (vverh, vniz, vpravo, vlevo);

var x, y: dvig; t: (vpered, nazad); k: integer;

Begin

T:=nazad; X:=vniz;

Case x of

Vverh, vniz: k:=1;

Else k:=0;

End;

Writeln (k);

End.

Вопрос 14

Для рисования окружности в графическом режиме можно использовать процедуры:

Circle и Ellipse

InitGraph и ClearDevice

SetTextStyle и Delay

DrawPoly и SetFillStyle

Bar и Rectangle

Вопрос 15

Дан фрагмент программы:

b:=5; k:=1;

For a:=b downto 4 do

Begin

k:=k*a;

k:=k+1;

end;

Writeln(k);

Что будет выведено на экран?