Чувствителен ли паскаль к регистру?
Чувствителен ли паскаль к регистру?
Что выведет данная программа?
var s:string[5];
begin
Write(sizeof(s));
end.
Что выведет данная программа?
var s:string[5];
begin
Write(sizeof(s));
end.
Что выведет следующая программа:
procedure proc(X: Integer);
begin
X:=1;
end;
var
r: Integer;
begin
r:=2;
proc(r);
Writeln(r);
end.
Что выведет следующая программа:
procedure proc(X: Integer);
begin
X:=1;
end;
var
r: Integer;
begin
r:=2;
proc(r);
Writeln(r);
end.
Укажите все вещественные типы:
Укажите все вещественные типы:
Какого оператора безусловного перехода нет в Pascal?
Какого оператора безусловного перехода нет в Pascal?
Является ли Pascal обьектно-ориентированным языком?
Является ли Pascal обьектно-ориентированным языком?
Идентификатор в Pascal не может начинаться с:
Идентификатор в Pascal не может начинаться с:
Что выведет следующий фрагмент кода:
n:= 2;
p:=@n;
p^ := 1;
Writeln('n=', n);
Что выведет следующий фрагмент кода:
n:= 2;
p:=@n;
p^ := 1;
Writeln('n=', n);
Сколько раз выполнится цикл в следующем фрагменте кода:
P := 4;
Repeat
P := P * 0.1
Until P < 0.0001;
Сколько раз выполнится цикл в следующем фрагменте кода:
P := 4;
Repeat
P := P * 0.1
Until P < 0.0001;
Что напечатает следующий код:
var
A: Single;
begin
A := 0.1;
if A = 0.1 then
Writeln('==')
else
Writeln('!=');
end.
Что напечатает следующий код:
var
A: Single;
begin
A := 0.1;
if A = 0.1 then
Writeln('==')
else
Writeln('!=');
end.
Как выполняется цикл с предусловием?
Варианты ответа:
1) Определяется, сколько раз должен быть выполнен цикл, и далее цикл с предусловием сводится к циклу с параметром
2) Выполняется тело цикла, изменяется параметр цикла, проверяется условие продолжения выполнения цикла
3) Тело цикла выполняется N раз (N — натуральное)
4) Проверяется условие продолжения выполнения цикла, выполняется тело цикла
5) Изменяется параметр цикла, проверяется условие продолжения выполнения цикла, выполняется тело цикла
Как выполняется цикл с предусловием?
Варианты ответа:
1) Определяется, сколько раз должен быть выполнен цикл, и далее цикл с предусловием сводится к циклу с параметром
2) Выполняется тело цикла, изменяется параметр цикла, проверяется условие продолжения выполнения цикла
3) Тело цикла выполняется N раз (N — натуральное)
4) Проверяется условие продолжения выполнения цикла, выполняется тело цикла
5) Изменяется параметр цикла, проверяется условие продолжения выполнения цикла, выполняется тело цикла
Какой раздел программы является обязательным?
Какой раздел программы является обязательным?
Каким будет значение переменной c после выполнения следующей программы?
var
a,c : integer;
b : real;
begin
a := abs(-2) + trunc(1.6) * (6 mod 4);
b := (a div 3) * sqrt(a + 5);
c := round(int(a / 4) + sqrt(b + 4) / sqrt(abs(b - a)));
end.
Каким будет значение переменной c после выполнения следующей программы?
var
a,c : integer;
b : real;
begin
a := abs(-2) + trunc(1.6) * (6 mod 4);
b := (a div 3) * sqrt(a + 5);
c := round(int(a / 4) + sqrt(b + 4) / sqrt(abs(b - a)));
end.
Какая из процедур не работает с динамической областью памяти в Турбо Паскале?
Какая из процедур не работает с динамической областью памяти в Турбо Паскале?
К процедурам для работы с динамическими переменными не относится?
К процедурам для работы с динамическими переменными не относится?
Чему равен индекс первого элемента массива?
Чему равен индекс первого элемента массива?
Выберите эквивалент следующего объявления var a:array[20] of byte.
Варианты ответа:
1) var a:array[0..20] of byte
2) var a:array[1..20] of byte
3) var a:array[20..20] of byte
4) Синтаксическая ошибка. Такое объявление недопустимо.
Выберите эквивалент следующего объявления var a:array[20] of byte.
Варианты ответа:
1) var a:array[0..20] of byte
2) var a:array[1..20] of byte
3) var a:array[20..20] of byte
4) Синтаксическая ошибка. Такое объявление недопустимо.
Каким будет значение k после выполнения кода:
k := 1;
while (k < 100) do k := k + k;
Каким будет значение k после выполнения кода:
k := 1;
while (k < 100) do k := k + k;
Что будет выведено в результате следующей программы:
var a, b, c: integer;
begin
a:=2;
b:=4;
c:=3;
if a>b then
if a>c then a:=0
else a:=1;
writeln(a);
end.
Что будет выведено в результате следующей программы:
var a, b, c: integer;
begin
a:=2;
b:=4;
c:=3;
if a>b then
if a>c then a:=0
else a:=1;
writeln(a);
end.