Среди приведённых ниже трёх чисел, записанных в различных системах счисления, найдите минимальное и запишите его в ответе в десятичной системе счисления. В ответе запишите только число, основание системы счисления указывать не нужно. 6716, 1508, 11010002.
Укажите тип переменной для выражения: ((х>=-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. в столбик
// Внимание! Если программа не работает, обновите версию!
begin
var n:=ReadInteger('Длина последовательности: ');
var a:=(SeqRandom(n-1,0,1)+(-1)).ToArray; // последовательность 0 и 1
a.Println;
if a.Where(x->x>=0).Distinct.Count>1 then
Writeln('Есть отличающиеся элементы')
else Writeln('Все элементы равны')
end.
Примеры
Длина последовательности: 4
1 1 1 -1
Все элементы равны
Длина последовательности: 5
0 1 1 0 -1
Есть отличающиеся элементы