Ф.И.: ……………………………………………… Кол-во баллов ДИОД )ПРИВЕТ 2)S=24 3) CONST a$=КРИМИНАЛИСТИКА DIM B$, C$ B$= MID$(a$,8,4) C$= MID$(a$,1,3)+ MID$(a$,11,3) PRINT B$, C$ 3
Критерии оценки оценка 2 – 5 и менее баллов оценка 3 – 6- 9 баллов оценка 4 – 10 – 12 баллов оценка 5 – баллов
Прочитайте текст зашифрованный на парусах? только смелым покоряютсяморя
Прочитайте зашифрованные тексты Яа иазауачаааюа ианафаоарамааатаиакауа Я изучаю информатику Зекотня – жгольниг, сафдра - агатемиг Сегодня – школьник, завтра - академик Теди кору Идет урок
Задача Задача: Составить программу шифровки текста путем замены всех звонких согласных глухими и наоборот. Б – П З – С Г - К Ж - Ш Д - Т В - Ф
DIM ……. INPUT ВВЕДИТЕ ТЕКСТ;A$ B=LEN (A$) FOR I=1 TO B IF MID$(A$,I,1)=З THEN A$= MID$(A$,1,I-1)+C+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Б THEN A$= MID$(A$,1,I-1)+П+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Г THEN A$= MID$(A$,1,I-1)+К+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Ж THEN A$= MID$(A$,1,I-1)+Ш+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Д THEN A$= MID$(A$,1,I-1)+Т+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=В THEN A$= MID$(A$,1,I-1)+Ф+MID$(A$,I+1,B) ELSE NEXT I PRINT A$
DIM……….. INPUT ВВЕДИТЕ ТЕКСТ;A$ B=LEN (A$) FOR I=1 TO B IF MID$(A$,I,1)=З THEN A$= MID$(A$,1,I-1)+C+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Б THEN A$= MID$(A$,1,I-1)+П+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Г THEN A$= MID$(A$,1,I-1)+К+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Ж THEN A$= MID$(A$,1,I-1)+Ш+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Д THEN A$= MID$(A$,1,I-1)+Т+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=В THEN A$= MID$(A$,1,I-1)+Ф+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=С THEN A$= MID$(A$,1,I-1)+З+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=П THEN A$= MID$(A$,1,I-1)+Б+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=К THEN A$= MID$(A$,1,I-1)+Г+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Ш THEN A$= MID$(A$,1,I-1)+Ж+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Т THEN A$= MID$(A$,1,I-1)+Д+MID$(A$,I+1,B) ELSE IF MID$(A$,I,1)=Ф THEN A$= MID$(A$,1,I-1)+В+MID$(A$,I+1,B) ELSE NEXT I PRINT A$
Задача: Составить программу шифровки текста путем прибавления после каждого символа одной и той же буквы. DIM ….. INPUT ВВЕДИТЕ ТЕКСТ;A$ B=LEN (A$) FOR I=1 TO B A$=MID$(A$,1,I)+Т+MID$(A$,I+1,B) NEXT I PRINT A$
Задача: Алекс передает открытым текстом сообщение Юстасу. Пеленгатор определяет место передачи, если она длится не менее 3 минут. С какой скоростью (в битах в секунду) должен передавать Алекс радиограмму? Сколько символов в секунду передает диктор для Юстаса, если радиограмма длится (согласно фильму «Семнадцать мгновений весны») 2 минуты 17 секунд?
Пеленгатор определяет место передачи, если она длится не менее 3 минут. С какой скоростью (в битах в секунду) должен передавать Алекс радиограмму? байт = 450·8 = 3600 бит 3 минуты = 3·60 =180 секунд 3600:180 = 20 бит/секунду
Сколько символов в секунду передает диктор для Юстаса, если радиограмма длится (согласно фильму «Семнадцать мгновений весны») 2 минуты 17 секунд? байт 2мин.17сек. = 2·60+17 = 137 секунд 450:137 =3,3 символа в секунду
Составить программу шифровки текста с помощью ключевой фразы Задача: Составить программу шифровки текста с помощью ключевой фразы. a$ - ключевая фраза b$ - секретный текст p$ - код, который необходимо найти с - результат
Секретный текст …умею ли я находить с помощью электронно – вычислительной машины значения функций, а также объемы многогранников?!
DIM…….. INPUT введите ключевую фразу;a$ INPUT введите секретный текст;b$ m=LEN (a$) FOR i=1 TO m p$= MID$(b$,i,1) FOR j=1 TO LEN (a$) IF MID$(а$,j,1)p$ THEN GOTO 1 c=j j= LEN (a$) 1: NEXT j PRINT c NEXT i
Компьютерный эксперимент
…умею ли я находить с помощью электронно – вычислительной машины значения функций, а также объемы многогранников?! АЛЕКС–ЮСТАСУ. ПРИВЕТ!
Доработать программу «Шифровщик» В начале программы определить пароль, который позволит пользователю начать шифрование секретного текста лишь в том случае, если он знает пароль. Если пароль неверен, то пользователь получает сообщение «Вы шпион! Работа с программой вам запрещена!»