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