Часть А
В заданиях части А выбрать только один ответ.
А1. Текстовый редактор – это приложение
1) для создания мультимедийных документов;
2) для создания, редактирования и форматирования текстовой информации;
3) для обработки изображений в процессе создания доклада.
А2. Текстовая информация-это
1) информация, представленная в форме письменного текста;
2) рисунки схемы, графики;
3) полный набор букв алфавита.
А3. Какие операции выполняют при редактировании текста?
1) Совершают операции по оформлению текста текст, исправляют ошибки, вносят изменения.
3) Выводят текст на печать.
А4. Какие из перечисленных ниже расширений соответствуют текстовому файлу?
1) exe, com, bat;
2) gif, bmp, jpg;
3) txt, doc, rtf.
А5. Какую программу нужно выбирать для обработки текстовой информации?
1) MS Excel;
2) MS Word;
3) Paint.
А6. При задании параметров страницы в текстовом редакторе устанавливаются:
1) гарнитура, начертание, размер;
2) поля, ориентация;
3) отступ, интервал.
А7. В каком из перечисленных ниже предложений правильно расставлены пробелы между словами и знаками препинания?
1) Слово не воробей , вылетит— не поймаешь!
2) Слово не воробей, вылетит — не поймаешь!
3) Слово не воробей, вылетит-не поймаешь !
4) Слово не воробей , вылетит —не поймаешь !
А8. Что такое абзац?
1) Абзац — это фрагмент текста, процесс ввода которого закончился нажатием на клавишу Esc.
2) Абзац — это фрагмент текста, процесс ввода которого закончился нажатием на клавишу Space.
3) Абзац — это фрагмент текста, процесс ввода которого закончился нажатием на клавишу Enter.
А9. К группе свойств символов можно отнести:
1) шрифт, размер шрифта, начертание и цвет;
2) выравнивание, размер шрифта, междустрочный интервал, цвет;
3) выравнивание, отступ первой строки, междустрочный интервал, отступ слева и справа, интервалы перед и после.
А10. Объем текстового файла вычисляется по формуле
1) I = K * i
2) N=2i
3) N=2*i
4) I=N+K
Так?
Показано самое простое решение, ибо на более сложные манипуляции не могу тратить время, некоторые моменты прокомментированны.
Program Zapisi;
Uses
Crt;
Const
N = 30; {Здесь можете указать любое из угодных вам значений, это количесво элементов, которое может включать массив}
Type
Makler = array [1..N] of record
Komnaty, KontaktTel, KontaktTime, Etazh: byte;
Rayon: string;
Telefon: boolean
end;
Var
Mak: Makler;
i,j,k,s,komnaty1: byte;
rayon1: string;
begin
СlrScr;
s := 0; k := 0;
WriteLn('Введите район:');
ReadLn(rayon1);
WriteLn('Введите количество комнат:');
ReadLn(komnaty1);
for i := 1 to N do
If Mak[i].Rayon = rayon1 then
{В данном случае используется самая банальная проверка слов на соответствие, так как регистр в данном случае имеет значение и любой лишний пробел нарушит соответствие, лучше, конечно же, было бы сделать посимвольную проверку с применением функции UpCase, дабы опустить регистр, но, как я сказал выше, времени не хватает.}
k := k + 0;
for j := 1 to N do
If Mak[j].Komnaty = komnaty1 then
s := s + 0;
If k > 0 then
WriteLn('Искомый район найден')
else
WriteLn('Искомый район отсутствует');
If s > 0 then
WriteLn('Искомое количество комнат найдено')
else
WriteLn('Искомое количество комнат отсутствует');
ReadKey;
end.
