что. Program test uses crt begin

• Название: Program test uses crt begin
• Дата: 24.01.2021
• Размер: 14.32 Kb.
• Имя файла: program test.docx
• Тип: Документы; #171016

program test;

uses crt;

begin
writeln('Ответами к заданиям 1-10 являются число, слово,');

writeln('последовательность букв или цифр. Ответы укажите');

writeln('сначала в тексте работы, а затем перенесите их в');

writeln('БЛАНК ОТВЕТОВ № 1 справа от номера соответствующего');

writeln('задания, начиная с первой клеточки, без пробелов,');

writeln('запятых и других дополнительных симвовлов. Каждый');

writeln('символ пишите в отдельной клеточке в соответствии с');

writeln('приведёнными в бланке образцами.');

readln;
clrscr;
Writeln('1. В одной из кодировок Unicode каждый символ кодируется 16 битами.');

Writeln('Петя написал текст (в нём нет лишних пробелов): ');

Writeln('«Уж, эму, лиса, выдра, барсук, опоссум, дикобраз, орангутанг — дикие животные».');

Writeln('Ученик вычеркнул из списка название одного из животных. Заодно он вычеркнул');

writeln('ставшие лишними запятые и пробелы — два пробела не должны идти подряд.');

writeln('При этом размер нового предложения в данной кодировке оказался на 20 байт');

writeln('меньше чем размер исходного предложения. Напишите в ответе вычеркнутое название');

writeln('животного.');

readln;
clrscr;
writeln('2. От разведчика было получено сообщение:');

writeln(' 1001100110111100');

writeln('В этом сообщении зашифрован пароль — последовательность русских букв.');

writeln('В пароле использовались только буквы А, Д, Н, О, Р, Т; каждая буква');

writeln('кодировалась двоичным словом по такой таблице:');

writeln('| А |Д | Н | О |P | Т |');

writeln('|101|01|110|100|00|111|');

writeln('Расшифруйте сообщение. Запишите в ответе пароль.');

readln;
clrscr;
writeln('3. Напишите наибольшее число х, для которого ложно высказывание:');

writeln('НЕ ((х > 50) ИЛИ НЕ (х чётное))?');

readln;
clrscr;
writeln('5. У исполнителя Альфа две команды, которым присвоены номера:');

writeln(' 1.прибавь 1');

writeln(' 2.умножь на b');

writeln(' (b — неизвестное натуральное число; b > 2)');

writeln(' Выполняя первую из них, Альфа увеличивает число на экране на 1, а выполняя');

writeln('вторую, умножает это число на b.');

writeln('Известно, что программа 11221 переводит число 2 в число 65.');

writeln('Определите значение b.');

readln;
clrscr;
writeln('7. В среду Владислав Сергеевич сказал Арсению, что файл с материалами к уроку');

writeln('физики выложен в Интернете по адресу http://myschool.edu/fiz/Urok3.pdf.');

writeln('В понедельник в свя¬зи с переналадкой школьного сервера Владислав Сергеевич');

writeln('переместил всю папку fiz в корневой каталог на сайте VSP.ru, доступ к которому');

writeln('осуществляется по протоколу ftp. Имя файла (как и всё содержимое папки) не');

writeln('изменилось. Укажите новый адрес файла с материалами к уроку.');

readln;
clrscr;
end.