Число 1,5 принадлежит множеству … a) C = {c | c  N, 1≤ c≤ 5}
b) A = {a | a  Q, a < 1}
c) B = {b | b  Z, –2≤ b< 2}
d) D = {d | d  R, –1≤ d≤ 1,6}

8
Укажите тип переменной для выражения: ((х>=-2) и (x<=2))
Если х, то
A. целый
B. вещественный
Если все выражение то
D. логический

9
Для выражения y=(3a+b)/2 исходными данными будут...
A. a,b

10
Для выражения y=(a+4b) при а=6, b=8 результат будет равен...
D. 38

11
Неправильным является имя величины...
C. 12авс

12
Сумма двух слагаемых а и b, деленная на сумму двух других
слагаемых c и d запишется как...
C. (a+b)/(c+d)

13
Имеется серия команд
f:=2;
f:=f*f;
f:=f*f;
f:=f*f.
Чему равен результат?
B. 256

14
Линейным называется алгоритм, в котором...
A. команды выполняются одна за другой в порядке их следования

15
Строка:
readln (A);
выполняет...
A. ввод в программу значения переменной А

16
Y:=5;
какой оператор выведет надпись Y=5?
A. writeln ( ' Y = ' , Y ) ;

17
а:=2; b:=8;
S:=а+b;
После выполненных последовательно данных трех команд переменная S принимает значение
равное ...
A. 10

18
S:=7;
S:=23;
writeln (S);
Какое значение будет выведено на экран?
A. 23

19
S:=1;
S:=S+5:
Writeln (S/2);
Что будет выведено на экране?
A. 3

20
A:=2; B:=5: B:=B-A; S:=A+B;
writeln (S);
Что будет выведено на экран?
A. 5

21
Для ввода данных в блок-схемах используют фигуру...
A. параллелограмм

22
Для выполнения вычислительных действий в блок-схемах используют фигуру...
C. прямоугольник

23
Определите результат работы фрагмента программы:
writeln ( ' 5+5= ' , 5+5 );
A. 5+5=10

24
Действие оператора WRITELN - это...
A. переход на новую строку

25
Сколько переменных нужно ввести для вычисления площади и периметра квадрата?
A. одну

26
Найдите логически неверно записанную последовательность команд.
те что имеют непонятные логические ходы
A. writeln (S); A:=A*2; readln (A,B); S:=A+B;
C. A:=A*2; readln (A,B); S:=A+B; Writeln (S);
D. readln (A,B); S:=A+B; A:=A*2; writeln (S);
27
Как будут выведены значения:
Writeln (A); Writeln (B); ?
A. в столбик

У меня получилось вот что (смотри скриншоты листинга программы и результата работы этой программы):
uses Crt;
const n = 10;
var A: array [1..n] of integer; 
        i: integer;
begin 
ClrScr; 
Randomize; 
WriteLn ( ' Massiv I: '); 
for i:=1 to n do 
    begin     
          A[i] := 1+random(n);  
          Write (A[i]:4); 
    end; 
WriteLn; WriteLn ( ' Massiv II: '); 
for i:=1 to n do 
    begin   
           if (A[i] mod 2 =0) then A[i]:=0 else A[i]:=3*A[i];     
           Write (A[i]:4); 
   end;
ReadLn;
end.