X принадлежит интервалу (2, 10) или (-2, 2)

Для круга единичного радиуса

Выберите выражение, которое правильно истинно для точки с координатами (x, y), лежащей внутри круга радиусом 2 и центром в начале координат

(x>2) and (x<10) or abs (x) < 2

Укажите, что будет выведено на экран следующей программой:

program print;

Var X : integer;

begin

x:=2;

writeln('x+1');

end.

sqr(x)+sqr(y)<=4

Выберите правильный вариант расположения чисел, напечатанных следующим фрагментом прогоаммы:

write(1); write(2, 3); writeln(4); write (5, 6);

writeln; write(7, 8);

x+1

Укажите правильную запись вычисления функции в виде одного условного оператора:

y = { cos(2x), если 0<x<2

{ 1 - sin(3x) иначе

1234

56

78

Необходимо переменной u присвоить большее из значений x и y. Какое из приведенных решений является неверным?

if (0<x) and (x<2) then y:=cos(2*x) else y:=1-sin(3*x);

Выберите оператор, реализующий конструкцию неполного ветвления:

if x > y then u:=x; u:=y;

Выберите оператор, реализующий конструкцию полного ветвления:

if условие then оператор;

Определите результат выполнения фрагмента программы:

j := 0; s := 0;

repeat

j := j+1;

s := s+2*j;

until j=4;

writeln (s);

if условие then оператор1 else оператор2;

Определить результат выполнения фрагмента программы:

x := 4;

s := 0;

while x > 0 do begin

s := s+x;

x := x div 2;

end;

writeln(s);

7

Укажите нажатием каких клавиш на клавиатуре можно остановить процесс выполнения программы при "зацикливании"

Ctrl+C

Определите значение переменной S после выполнения следующих операторов:

S:=0;

i:=0;

while i<5 do

i:=i+1;

s:=s+i;

5

9 Раздел

Свойство алгоритма « дискретность» означает:

Алгоритм состоит из отдельных шагов. Каждый шаг алгоритма – это некоторое законченное действие

К динамическим переменным НЕ относится следующая характеристика

память под переменные отводится во время компиляции программы

Укажите достоинство применение линейных связанных списков

размер ограничен только объемом памяти компьютера и разрядностью указателей

Какая процедура отсекает часть открытого файла, начиная с текущего компонента, и подтягивает на его место конец файла?

truncate (f)

Для чего служит процедура append (f)?

служит для специального открытия файлов для записи

Каков результат фрагмента программы:

assing (f, 'a:\number.txt');

rewrite (f);

for i:=1 to 5 do

begin

readln (n);

writeln (f, n);

end;

close (f);

(где n-переменная типа integer)

записывает в файл 5 целых чисел

Каков результат фрагмента программы:

assing (f, 'a:\number.txt');

append (f);

for i:=1 to 5 do

begin

readln (n);

writeln (f, n);

end;

close (f);

(где n-переменная типа integer)

добавляет в файл 5 чисел

Каков результат фрагмента программы:

assing (f, 'a:\number.txt');

reset (f);

while not EOF (f) do

begin

readln (f, n);

writeln (n);

end;

close (f);

(где n-переменная типа integer)

выводит содержимое файла

Каков результат фрагмента программы:

sum:=0;

kol:=0;

assing (f, 'a:\number.txt');

reset (f);

while not EOF (f) do

begin

readln (f, n);

sum:=sum+n;

kol:=kol+1;

end;

close (f);

sa:=sum/kol;

writeln (sa);

(где n-переменная типа integer)

вычисляет среднее арифметическое 5-ти целых чисел

Пользовательская функция может иметь, результатов: - только один

Var X,Y:Integer;

Procedure Reverse( A,B:Integer);

Begin

A:= A*10; B:= B+5; WriteLn(B:3,A:3);

End;

Begin

X:= 1; Y:= 100;

Reverse(4,5);

End.

10 40

Установите, результат выполнения программы

Var X:Real;

Procedure TR57;

Var X:Real;

Begin WriteLn(X); End;

Begin

X:= 5;TR57;

End.

0

В результате работы программы на экран монитора:

Var X:Real;

Procedure TR58;

Begin WriteLn(X:6:2); End;

Begin X:= Pi; TR58; End.

будет выведено:

3.14

Задан текст программы Локальные параметры описываются в строчке

1) Var A,B : Integer;

2) Procedure ZB1;

3) Var A:Integer;

4) Begin A:=sqr(5); B:=15; End;

5) Begin A:=18; B:=37;

6) ZB1;

7) WriteLn ('A3 =',A, 'B3 =',B);

3

Var A,B:Integer;

Procedure TR56 (X:Integer;Var Y:Integer);

Begin

If X<0 Then Y:=-X+3 Else Y:= X*2

End;

Begin

TR56 (A+3,B);

WriteLn ('A =', A, 'B =',B);

End.

Результатом выполнения программы, будет:

a) A=-2 B=-4

Для вывода на экран элементов побочной диагонали матрицы A размерностью nxn необходимо описать следующий фрагмент

for i:= 1 to n do

Write (‘ ‘, A[i,n+1-i]);

Для вывода на экран элементов главной диагонали матрицы A размерностью nxn необходимо описать следующий фрагмент

for i:= 1 to n do

Write(‘ ‘, A[i,i]);

Дан фрагмент программы: