A) Var A: Real;
B) Var A: Integer;
C) Var A: String;
D) Var A: Char;
E) Var A: Boolean;
9. Определите результат работы фрагмента программы:
A:=-5;
B:=-5;
A:=A+2*B;
B:=A;
Writeln (A,B);
A) -6, -15
B) -5, -5
C) -15, 0
D) -15, -15
E) 15, 15
10. Если a = 53, то результат a div 10 равно
A) 5
B) 3
C) 5,3
D) 530
E) Правильного ответа нет
11. Найдите правильную запись на языке программирования для формулы: 
A) (sin (30*pi/180)+1)/2*sqrt(a);
B) (sin 300 +1)/2*sqrt(a);
C) sin (30*pi/180)+1/2*sqrt(a);
D) (sin (30*pi/180)+1)/2sqrt(a);
E) sin (30*pi/180)+1/(2*sqrt(a));
12. Найдите правильно записанную ПОЛНУЮ форму конструкции ветвления:
A) If a><b then c:=a-b;
B) If a>b else c:=a+b then c:=a-b;
C) If a>b c:=a+b else c:=a-b;
D) If a>b then c:=a-b else c:=a+b;
E) If a>b else c:=a+b;
13. Определите результаты выполнения фрагмента программы:
X:=3; Y:=5; Z:=7;
if (X>1) and (Y<>0) then Z:=X+Y;
write (Z);
A) 7
B) 3
C) 5
D) 8
E) 0
14. Оператор CASE служит для создания:
A) Линейных алгоритмов
B) Разветвляющихся алгоритмов
C) Циклических алгоритмов
E) Вспомогательных алгоритмов
D) Правильного ответа нет
15. Цикл For используется, если:
A) Число повторений нельзя определить заранее
B) Некоторую последовательность действий надо выполнить несколько раз, причем число повторений можно определить заранее
C) Некоторую последовательность действий надо выполнить несколько раз, причем число повторений нельзя определить заранее
D) Некоторую последовательность действий надо выполнить несколько раз;
E) Правильного ответа нет
16. Сколько строк напечатает программа:
var k:integer;
begin
FOR k:=8 DOWNTO 1 DO
writeln(‘Мне нравится Паскаль.’);
end.
A) 8;
B) 10;
C) 14;
D) 32;
E) Правильного ответа нет.
17. Определите значение выражения:
length (‘тетрадь’) + (length(‘114’)+6)/3
A) 47
B) 16/3
C) 12
D) 123
E) 10
18. Определить результат выполнения операций вырезки и соединения:
A:=’ вертикаль’;
Write (copy(A, 6, 4)+ copy(A, 6, 2));
A) ветка
B) река
C) карта
D) калька
E) веер