1. Информатика
  2. Паскаль абс 1.символы вводятся

Паскаль абс 1.символы вводятся с клавиатуры до символа ‘.’ (точка). вывести символы, предшествующие каждому из введенных. (ввод: feui56hg вывод: edth45gf)

Dasha12541 Dasha12541    3   08.10.2019 05:30    0

Ответы
suyargklova suyargklova  11.08.2020 15:34

var k:char;

s:string;

BEGIN

s:='';

repeat

read(k);

s:=s+chr(ord(k)-1)

until k='.';

delete(s,pos('-',s),1);

writeln(s);

end.

ПОКАЗАТЬ ОТВЕТЫ
Другие вопросы по теме Информатика
mkatty2910 mkatty2910  23.04.2021 13:09
Вывести на экран кубы чисел от A до B Паскаль...
Zero00000 Zero00000  23.04.2021 13:09
3. Для швидкого виділення рядка необхідно:ноа) клікнути мишею в довільному місцірядка з натиснутою клавішею Ctrl;406)утримуватипри виділеннінатиснутою клавішу Alt;ГОв) два...
maschakriki maschakriki  23.04.2021 13:08
Задача «Відгадай загадку» Користувачеві відображається загадка, наприклад «Що літає, крил не має. але крила підіймає?» Якщо користувач вводить правильну відповідь: «вітер»,...
vika78678 vika78678  23.04.2021 13:08
Подскажите , Язык C++, в чем ошибка? Изначальное задание: Дана строка, состоящая из русских слов, разделенных пробелами (одним или несколькими). Вывести строку, содержащую...
ilyhan787228 ilyhan787228  14.02.2020 23:56
Как известно, запись числа в большинстве позиционных системах счисления определяется базисом и набором цифр, которые могут использоваться в каждом из разрядов (в некоторых...
mashA2007111 mashA2007111  14.02.2020 23:56
Номер билета из n цифр, где n чѐтное, называется ― почти счастливым , если в нем сумма первых n/2 цифр ровно на единицу отличается от суммы остальных цифр. Например, 123005...
yuralavrenov2016 yuralavrenov2016  15.02.2020 00:17
Напишите наибольше целое число х для которого истинно высказывание (x 70) или не (x 80)...
Gibertblite Gibertblite  17.03.2021 17:30
Считая, что каждый символ кодируется одним байтом, определи, чему равен информационный объём следующего словосочетания: город - Ростов  ответ:  байтов. НАДО !​...
Препод007 Препод007  17.03.2021 17:29
Задание 1: написать программу, которая по заданному значению аргумента x, вычислит значение функции y. Задание 2: составить таблицы значений функции y = f(x) на участке [0;...
Ksyusha20 Ksyusha20  17.03.2021 17:29
Підпрограма (процедура, функція), що використовується виключно разом з об’єктом -це...​...

Популярные вопросы