Все
Математика
Алгебра
Геометрия
Литература
Русский язык
Истоки
Краеведение
Французский язык
Литературное чтение
Астрономия
Природоведение
Родной край
Немецкий язык
Технология
Физика
Английский язык
Обществознание
Химия
Биология
История
О`zbek tili
Окружающий мир
Естествознание
География
Украинский язык
Информатика
Украинская литература
Казахский язык
Физкультура и спорт
Экономика
Музыка
Право
Белорусский язык
МХК
Кубановедение
ОБЖ
Психология
Кыргыз тили
Другие предметы
Показать все предметы
Ламех
22.01.2022, 10:34
Информатика

Составить программу в Pascal. В которую введя любое трехзначное число оно выводит число-перевертыш (пример ввожу

122 и мне выводит 121 или 569 и и мне 565)
Знаешь ответ?

Чтобы оставить ответ, или зарегистрируйтесь.

Ответ или решение 1
Играр

var
s, s2: string;
n, m: longint;
i, err: integer;

begin
writeLn ( 'Введите целое трехзначное число: ' );
readln ( n );
str ( n, s );
s2 := '';
for i := length ( s ) downto 1 do
s2 := s2 + s[i];
val (s2, m, err);
writeLn ( 'Полученное число: ', M, '.' );
readln;
end.