Предмет: Информатика, автор: bek011126

В Pascal ABC для букв латинского алфавита на стандартной клавиатуре нужно напечатать букву справа от нее. В этом случае клавиатура считается закрытой, то есть буква”s”,буква”q”справа от буквы”w”.


bek011126: практическая работа помогите быстрее пожалуйестаааа!!!!!!!!!

Ответы

Автор ответа: HP2020
1

Код (PascalABC.NET):

##

var keyboard := 'qwertyuiopqasdfghjklazxcvbnmz';  // строчка, которая получилась при проведении пальцем по клавиатуре. Первый символ повторяется после последнего символа своего ряда

var index := pos(ReadChar, keyboard);  // ищем позицию введенного символа

write(keyboard[index + 1]) // и выводим символ, который идет после найденного

Пример ввода:

l

Пример вывода:

a


bek011126: плиз дайте легкий ответ
Похожие вопросы
Предмет: Математика, автор: lubasha005
Предмет: Алгебра, автор: marikawaii27i