Чувствителен ли паскаль к регистру?
Чувствителен ли паскаль к регистру?
Сколько раз выполнится цикл в следующем фрагменте кода:
P := 4;
Repeat
P := P * 0.1
Until P < 0.0001;
Сколько раз выполнится цикл в следующем фрагменте кода:
P := 4;
Repeat
P := P * 0.1
Until P < 0.0001;
Какой раздел программы является обязательным?
Какой раздел программы является обязательным?
Что выведет следующая программа:
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 не может начинаться с:
Как выполняется цикл с предусловием?
Варианты ответа:
1) Определяется, сколько раз должен быть выполнен цикл, и далее цикл с предусловием сводится к циклу с параметром
2) Выполняется тело цикла, изменяется параметр цикла, проверяется условие продолжения выполнения цикла
3) Тело цикла выполняется N раз (N — натуральное)
4) Проверяется условие продолжения выполнения цикла, выполняется тело цикла
5) Изменяется параметр цикла, проверяется условие продолжения выполнения цикла, выполняется тело цикла
Как выполняется цикл с предусловием?
Варианты ответа:
1) Определяется, сколько раз должен быть выполнен цикл, и далее цикл с предусловием сводится к циклу с параметром
2) Выполняется тело цикла, изменяется параметр цикла, проверяется условие продолжения выполнения цикла
3) Тело цикла выполняется N раз (N — натуральное)
4) Проверяется условие продолжения выполнения цикла, выполняется тело цикла
5) Изменяется параметр цикла, проверяется условие продолжения выполнения цикла, выполняется тело цикла
Чему равен индекс первого элемента массива?
Чему равен индекс первого элемента массива?
К процедурам для работы с динамическими переменными не относится?
К процедурам для работы с динамическими переменными не относится?
Выберите эквивалент следующего объявления 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: 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.
Какая из процедур не работает с динамической областью памяти в Турбо Паскале?
Какая из процедур не работает с динамической областью памяти в Турбо Паскале?
Что выведет данная программа?
var s:string[5];
begin
Write(sizeof(s));
end.
Что выведет данная программа?
var s:string[5];
begin
Write(sizeof(s));
end.
Что выведет следующий фрагмент кода:
n:= 2;
p:=@n;
p^ := 1;
Writeln('n=', n);
Что выведет следующий фрагмент кода:
n:= 2;
p:=@n;
p^ := 1;
Writeln('n=', n);
Каким будет значение переменной 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, 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.