Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
tizhurist
26.07.2020 05:01 •
Информатика
Для данной буквы латинского алфавита нужно вывести справа стоящую букву на стандартной клавиатуре. при этом клавиатура замкнута, т.е. справа от буквы «p» стоит буква «a», от буквы «l» стоит буква «z», а от буквы «m» — буква «q».
Показать ответ
Ответ:
Medvedevatanya1
05.07.2020 23:53
Var a:char;
begin
writeln('Введите букву');
readln(a);
case a of
'q': writeln('w');
'w': writeln('e');
'e': writeln('r');
'r': writeln('t');
't': writeln('y');
'y': writeln('u');
'u': writeln('i');
'i': writeln('o');
'o': writeln('p');
'p': writeln('a');
'a': writeln('s');
's': writeln('d');
'd': writeln('f');
'f': writeln('g');
'g': writeln('h');
'h': writeln('j');
'j': writeln('k');
'k': writeln('l');
'l': writeln('z');
'z': writeln('x');
'x': writeln('c');
'c': writeln('v');
'v': writeln('b');
'b': writeln('n');
'n': writeln('m');
'm': writeln('q');
end;
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
agulmira62
04.07.2020 09:21
Квадраты нужно вывести на экран таблицу квадратов. input со стандартного устройства ввода вводится 1 целое число – 1 =n =100. output нужно выдать на стандартное...
artem876
08.02.2023 16:12
Люди, , ! подписать все куски программ построчно (что они выполняют) подписать только куски под номерами 1, 2, 3: program test ; var a, b, c, n, i, min: integer;...
мама1021
21.11.2022 07:06
Решить информатику . надо вывести на экран квадрат введенного числа...
artkeyn1
17.11.2021 05:46
Решить , надо вывести на экран квадрат введенного числа...
Yatoi
06.02.2022 14:08
Пацаны как решить а + б на командном блоке майнкрафт...
ТвояМилая
15.03.2020 13:07
Составить программу,которая определяет,являются ли два данных натуральных числа взаимно простыми, и выводит на экран соответствующее сообщение: да или нет...
petrovspb
28.09.2022 15:23
Что такое редактирование ячеек?...
ВЕSТ
19.04.2023 08:57
МНОГО PYTHON. Дано положительное целое число. Найдите количество нулей в его двоичной записи....
sssaaa4
28.03.2023 10:51
Дано положительное целое число. Найдите количество нулей в его двоичной записи. Формат входных данных Вводится одно число n (1 ≤ n ≤ 109). Формат выходных данных...
violettakot01
17.06.2020 05:22
На сканере с максимальной разрешающей и глубиной цвета 24 бита отсканировали фотографию размером 3 на 4 дюйма. Определите размер полученного файла, если сканировали...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
writeln('Введите букву');
readln(a);
case a of
'q': writeln('w');
'w': writeln('e');
'e': writeln('r');
'r': writeln('t');
't': writeln('y');
'y': writeln('u');
'u': writeln('i');
'i': writeln('o');
'o': writeln('p');
'p': writeln('a');
'a': writeln('s');
's': writeln('d');
'd': writeln('f');
'f': writeln('g');
'g': writeln('h');
'h': writeln('j');
'j': writeln('k');
'k': writeln('l');
'l': writeln('z');
'z': writeln('x');
'x': writeln('c');
'c': writeln('v');
'v': writeln('b');
'b': writeln('n');
'n': writeln('m');
'm': writeln('q');
end;
end.