М
Молодежь
К
Компьютеры-и-электроника
Д
Дом-и-сад
С
Стиль-и-уход-за-собой
П
Праздники-и-традиции
Т
Транспорт
П
Путешествия
С
Семейная-жизнь
Ф
Философия-и-религия
Б
Без категории
М
Мир-работы
Х
Хобби-и-рукоделие
И
Искусство-и-развлечения
В
Взаимоотношения
З
Здоровье
К
Кулинария-и-гостеприимство
Ф
Финансы-и-бизнес
П
Питомцы-и-животные
О
Образование
О
Образование-и-коммуникации
Colere
Colere
05.04.2020 04:14 •  Информатика

Исполнитель Шифровальщик обрабатывает строку из символов. Сначала он вычисляет длину исходной строки. Если она четна, то в конец цепочки добавляется буква А, если нечетна – в начало добавляется буква Я. В полученной строке каждая буква заменяется следующей по алфавиту (А – на Б, Б – на В, и т. д., а Я – на А). Какую строку получит Шифровальщик, зашифровав строку ГЕПАРД?

Комментарий. Шифровальщик использует полный алфавит, включая буквы Ё и Й.

👇
Открыть все ответы
Ответ:
alsuu00
alsuu00
05.04.2020

Общение между людьми – это естественный и жизненно важный процесс. Когда-то эпистолярный жанр был единственным доступным общения людей, находящихся на удалении друг от друга. Почта существовала со времен древнего Рима, если не раньше. Люди переписывались. В литературе известны даже романы и повести в письмах.

Современные достижения в сфере  информационных технологий предлагают новые, более совершенные общения.

При этом почтовая переписка сохраняется. Это старый, но надежный общения, который обладает своими неповторимыми качествами. Современный формат почтовой переписки представляет электронная почта, иначе E-mail.

Электронная почта в отличие от обычной позволяет общаться адресатам практически мгновенно. Нажал кнопку «Отправить» (письмо), и через несколько секунд получатель видит это письмо в своей почте, в папке «Входящие».

4,7(31 оценок)
Ответ:
dianaism38
dianaism38
05.04.2020
Вариант с циклом while ... do...
program z1;
uses crt;
var n:longint;
i,max,x:integer;
begin
clrscr;
read(n);
max:=-1;
i:=1;                {это будет переменная-счетчик}
while i<=5 do
begin
x:= n mod 10;
if x>max then max:=x;
n:= n div 10;       {в этой строке исправлена опечатка в оригинале}    
i:=i+1;                   {наращиваем счетчик вручную}
end;
writeln(max);
end.

Вариант с циклом repeat ... until
program z1;
uses crt;
var n:longint;i,max,x:integer;
begin
clrscr;
read(n);
max:=-1;
i:=1;
repeat
x:= n mod 10;
if x>max then max:=x;
n:= n div 10;
i:=i+1;
until i>5;
writeln(max);
end.

Вариант с циклом repeat ... until без счетчика!
program z1;
uses crt;
var n:longint;
max,x:integer;
begin
clrscr;
read(n);
max:=-1;
repeat
x:= n mod 10;
if x>max then max:=x;
n:= n div 10;
until n=0;
writeln(max);
end.
В последнем примере условием окончания цикла будет случай, когда число станет равным 0. Действительно, после каждого повторения цикла число становится на один разряд меньше (выделенная цветом строка программы), значит, когда-нибудь такое число станет равным 0 (цикл подходит для числа с любым количеством цифр). Пример: 34567 -> 3456 -> 345 -> 34 -> 3 -> 0
4,6(53 оценок)
Это интересно:
Новые ответы от MOGZ: Информатика
logo
Вход Регистрация
Что ты хочешь узнать?
Спроси Mozg
Открыть лучший ответ