В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
mottorinanadia7
mottorinanadia7
19.12.2022 16:30 •  Информатика

Расшифруйте зашифрованное сообщение. Для этого:  Ознакомьтесь с алгоритмом шифровки.
 Продумайте и запишите алгоритм расшифровки.
 Расшифруйте сообщение по составленному вами алгоритму.

Недрост ойено тасла нет ливкому чемло векпутр атифтьп одроб норсабу часлына влы чисклен изя, копто рыесмож нобрыло бысдо вепри тьмраши нре.
(Г.В. Лейбниц, математик)

Использованный алгоритм шифровки
(известный под названием "метод лишней буквы"):
1. Разбейте значащие символы сообщения на группы с четным числом букв в каждой (пробелы в данном алгоритме не считаются значащими символами).
2. Сделайте в середине каждой группы промежуток.
3. Произвольно вставьте в промежутки лишние буквы.​

Показать ответ
Ответ:
marinamelnik19p07421
marinamelnik19p07421
12.02.2021 09:29

1.

а)

var a, b: integer;

read(a, b);

writeln((a + b) / 2);

б)

var a, b, c, d, e: integer;

read(a, b,c, d, e);

writeln(a*a, b*b, c*c, d*d, e*e);

в) Не знаю это.

д) Решето Эратосфена.

2)

а)

array [1..n] of integer;

var c: integer;

c := 1;

read(n);

while //запускаем цикл для ввода значений массива и подсчёта произведения

read(a[n]);

c = c * a[n];

end;

writeln(c);

б)

array [1..n] of integer;

var c: integer;

read(a[0]);

c := a[0];

while //запускаем цикл для ввода значений массива и определения максимального элемента

read(a[n]);

if {

c > a[n];

} then c := a[n];

end;

writeln(c);

в)

array [1..n] of integer;

var c: integer; //переменная-счётчик

while //запускаем цикл для ввода значений массива и определения количества отрицательных чисел

if {

a[n] < 0;

} then c := c + 1;

end;

writeln(c);

г)

array [1..n] of integer;

var c: integer; //переменная-счётчик

while //запускаем цикл с позиции a[1] для ввода значений массива и определения количества искомых элементов

if {

a[n] = a[0];

} then c := c + 1;

end;

writeln(c);

0,0(0 оценок)
Ответ:
dmitriyvoron8
dmitriyvoron8
15.05.2021 17:48
Горячие клавиши
Инструменты:
A — Аэpогpаф (AirBrush)
В — Кисть (Brush)
С — Рамка (Crop)
E — Ластик (Eraser)
F — Режим (окно/весь экpан с меню/весь экpан без меню)
G — Гpадиент (Gradient)
H — Рyка (Hand)
I — Пипетка (Eyedropper)
K — Заливка (Paint Bucket)
L — Лассо (Lasso)
М — Область (Marquee)
N — Линия (Line)
O — Тониpование (Toning Tools)
P — Каpандаш (Pencil)
Q — Быстpая маска (Quick Mask)
R — Фокyс (Focus Tools)
S — Штамп (Stamp)
T — Палитpа контypы (Path)
U — Палец (Smudge Tool)
V — Пеpемещение (Move)
W — Волшебная палочка (Magic Wand)
Y — Текст (Text)
Z — Масштаб (Zoom)
X — Поменять местами фоновый и основной цвета
D — Сбросить цвет/фон в черный и белый
[ - Пpедyдыщая кисть
] — Следyющая кисть
0,0(0 оценок)
Популярные вопросы: Информатика
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota Оформи подписку
logo
Начни делиться знаниями
Вход Регистрация
Что ты хочешь узнать?
Спроси ai-бота