Поделитесь своими знаниями, ответьте на вопрос:
1. Информатика занимается изучением ... а. приёмов и методов накопления, передачи, хранения и обработки информации; б. приемов и методов обработки информации; в. приемов и методов создания информации; г. принципов работы средств вычислительной техники. 2. Какие из перечисленных систем счисления непозиционная: а. десятичная: б. двоичная; в. римская г. троичная. 3. Число 1000112 в десятичной системе счисления равно: а. 3510; б. 6410; в. 3810. г. 12310. 4. Для какой операции построена таблица истинности: А B F 1 1 1 1 0 1 0 1 1 0 0 0 а. конъюнкция (логическое умножение); б. дизъюнкция (логическое сложение); в. инверсия (логическое следование 5. Выберите алфавит шестнадцатеричной системы счисления: а. 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15, 16; б. 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, 10, 11, 12, 13, 14, 15; в. 0, 1, 2, 3, 4, 5, 6, 7, 8, 9, A, B, C, D, E, F г. 1, 2, 3, 4, 5, 6, 7, 8, 9, A, B, C, D, E, F. 6. Что такое декодирование? а. преобразование входной информации в форму, воспринимаемую компьютером; б. преобразование данных из двоичного кода в форму, понятную человеку; в. это система условных знаков для преобразования информации. 7. Выберите правильное имя файла: а. SDR.EXE; б. 5LIST.DOC1; в. T/34; г. PIRAT.ASC.COM. 8. Информатизация общества — это процесс: а. увеличения объема избыточной информации в социуме; б. возрастания роли в социуме средств массовой информации; в. более полного использования накопленной информации во всех областях человеческой деятельности за счет широкого применения средств информационных и коммуникационных технологий; г. повсеместного использования компьютеров (где надо и где в этом нет абсолютно никакой необходимости; д. обязательного изучения информатики в общеобразовательных учреждениях. 9. Информацию, не зависящую от личного мнения или суждения, называют: а. достоверной; б. актуальной; в. объективной; г. понятной. 10. Какова таблица истинности логической функции F= неА или неВ: а. б. в. А В F А В F А В F 0 0 1 1 0 1 0 1 0 0 0 1 0 0 1 1 0 1 0 1 1 1 1 0 0 0 1 1 0 1 0 1 0 1 1 0
// PascalABC.Net
var vowel: set of char = ['а', 'у', 'о', 'ы', 'и', 'э', 'я', 'ю', 'ё', 'е'];
s, substr: string;
begin
s := 'кот в сапогах';
var words := s.Split(' ');
for var i := 0 to words.length - 1 do
begin
for var j := 1 to words[i].Length do
if words[i][j] in vowel then
begin
substr := Copy(words[i], 1, j-1);
Delete(words[i], 1, j-1);
words[i] += substr;
break;
end;
words[i] += 'циус';
end;
writeln(words.JoinIntoString(' '));
end.