1. Информационный объѐм статьи, набранной на компьютере, составляет 15 Кбайт. Определите, сколько страниц содержит статья, если известно, что на каждой странице 32 строки, в каждой строке 48 символов и каждый символ кодируется 16 битами (одна из кодировок Unicode).
1) 15 2) 10 3) 8 4) 5
2. Для какого из указанных значений числа X ЛОЖНО выражение:
( X > 12 ) ИЛИ НЕ ( X > 11)?
1) 11 2)12 3) 13 4) 14
3.Для какого из приведѐнных имѐн ИСТИННО высказывание:
НЕ (Первая буква гласная) И НЕ (Последняя буква согласная)?
1) Иван 2) Даниил 3) Семѐн 4) Никита
4.Чертѐжнику был дан для исполнения следующий алгоритм:
Повтори 3 раз
Сместиться на (1, –3) Сместиться на (–4, 1) Сместиться на (1, 1) конец
На какую одну команду можно заменить этот алгоритм, чтобы Чертѐжник оказался в той же точке, что и после выполнения алгоритма?
1) Сместиться на (–6, –3) 3) Сместиться на (6, –3)
2) Сместиться на (–2, –1) 4) Сместиться на (6, 3)
5. Определите значение переменной а после выполнения данного алгоритма: a := 20 b := 1 a := (a+b) div 3 b := a-2*b a := a-b
1) 15 2) 18 3)2 4) 3
6. Определите значение переменной c после выполнения следующего фрагментаалгоритма a := 17 b := 20 a := 3 * a - b
если a > b
то c:= 5 * a - b иначе c:= 5 * a + b все
1)130 2)131 3)135 4)175
7. Определите, что будет напечатано в результате работы следующей программы.
var a, k : integer;
begin a := 40; for k := 2 to 5 do a := a – k;
write (a); end.
1)10 2)26 3) 27 4) 15
8. Некоторое число в двоичной системе счисления записывается как 1111011. Запишите это число в десятичной системе.
1)112 2) 127 3) 122 4) 123
9. Пользователь работал с каталогом E:\Фильмы\Мультики\Золушка. Сначала он поднялся на один уровень вверх, затем ещѐ раз поднялся на один уровень вверх и после этого спустился в каталог Аудио, далее спустился в каталог Песни. Укажите полный путь каталога, в котором оказался пользователь.
1) E:\Аудио\Песни 3) E:\Фильмы\Мультики\Аудио\Песни
2) E:\Фильмы\Аудио\Песни 4) E:\Фильмы\Песни\Аудио
Var
f,s:text;
st,sp:string;
i:integer;
c:char;
begin
assign(s,'text1.txt');
reset(s);
while not Eof(s) do
begin;
readln(s,sp);
st:=st+sp+chr(10)+chr(13);
end;
close(s);
for i:=1 to length(st) div 2 do
begin
c:=st[i];
st[i]:=st[length(st)-i+1];
st[length(st)-i+1]:=c;
end;
assign(f,'text.txt');
rewrite(f);
write(f,st);
close(f);
end.
Текст в файле text1.txt:
Simple text
1And another simple text
2New text
Текст в файле text.txt:
txet weN2
txet elpmis rehtona dnA1
txet elpmiS