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