Автор статьи
Валерия
Эксперт по сдаче вступительных испытаний в ВУЗах
1
Какие утверждения правильны?
2
Что будет напечатано программой?
var a: integer;
function f(x: integer): integer;
begin f:=x; a:=0 end;
begin
a:=2; write(a+f(a), a);
end.
3
Пусть a=false и b=false.
Укажите истинные логические выражения.
4
Дано описание:
type circle = record
radius: real;
centre: record x, y: real end
end;
var C: circle;
Требуется переменной C присвоить значение, соответствующее кругу радиуса 1 с центром в точке (0, 2). В каких из следующих операторах присоединения правильно решается эта задача?
5
Укажите верное утверждение.
6
Пусть формальный язык описывается следующими формулами Бэкуса-Наура:
<фио>::=<имя><фамилия>
<имя>::=<имя собственное>{–<имя собственное>}
<фамилия>::=<имя собственное>{–<имя собственное>}
<имя собственное>::=<большая буква>{<малая буква>}
Здесь синтаксические классы <большая буква> и <малая буква> содержат соответствующие русские буквы.
Какие следующие синтаксические цепочки символов принадлежат множеству значений понятия <фио>?
7
Укажите строки правильно описанных типов.
8
Дан фрагмент программы (все переменные – integer):
z:=0; u:=x;
while u<>0 do
begin
if odd(u) then z:=z+y;
u:= u div 2;
end;
Выполните этот фрагмент с заданными x=5, y=10.
Чему равно z после выполнения?
9
type ref = ^integer;
var p, q: ref;
Пусть p^=2 и q^=3.
Что будет выдано на печать в результате выполнения следующих операторов?
p^:=q^;
if p=q then p:=nil else if p^=q^ then q:=p;
if p=q then q^:=5;
writeln(p^);
10
Дана рекурсивная функция:
function f(n: integer): integer;
begin
if n>100 then f:=n-10
else f:=f(f(n+11))
end;
Вычислите f(96).
11
Укажите верное утверждение.
12
Какие утверждения верны?
13
Что вычисляет следующая программа, если мы вводим n натуральных чисел a1, a2, …, an?
var n, a, k, i: integer;
begin
writeln(‘Введите количество натуральных чисел’);
readln(n);
k:=0;
writeln(‘Введите ‘, n, ‘ натуральных чисел’);
for i:=1 to n do
begin
readln(a);
if sqr(trunc(sqrt(a)))=a then if trunc(sqrt(a)) mod 2 <>0 then k:=k+1;
end;
writeln(k);
end.
14
Запишите указанное действие в виде одного условного оператора.
y=⎧⎩⎨⎪⎪⎪⎪⎪⎪⎪⎪x2,приx<0,x,приx>0,0,иначе.y={x2,приx<0,x,приx>0,0,иначе.
15
var p: set of 0..9; i, j: integer;
Если i=2 и j=5, то какое значение получит переменная p при выполнении следующего оператора присваивания?
p:=[i+3,j div 2,j..sqr(i)-3];
О сайте
Ссылка на первоисточник:
http://www.earth.spbu.ru/
Поделитесь в соцсетях: