Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
alexandra152
09.09.2021 18:02 •
Информатика
Склавиатуры вводится слово. получить новое слово, образуемое путем прочтения исходного слова, начиная с его конца. pascal abc
Показать ответ
Ответ:
артем1ппн
06.10.2020 02:40
Var
S,B:string;
i:integer;
Begin
Write('Введите строку: ');ReadLn(S);
For i:= Length(S) downto 1 do
B:=B+S[i];
WriteLn('Перевёрнутая строка: ',B);
End.
0,0
(0 оценок)
Популярные вопросы: Информатика
silvi82
09.04.2023 19:06
Рассчитать время звучания моноаудиофайла если при 16-битном кодировании и частоте дискретизации 32 кгц и его объем равен 700 кбайт...
lshellter
09.04.2023 19:06
Шифр перестановки. кодирование осуществляется перестановкой букв в слове по одному и тому же правилу. восстановить слова и определить правило перестановки: нимарел, летофен,...
SmartPocan
09.04.2023 19:06
Из перечисленных операций обработки текстового документа к форматированию абзацев указание интервала между символами указание интервала между строками подчеркивание фрагмента...
starushka94
10.02.2020 00:14
Привет с задачей (язык Python): N человек, пронумерованных числами от 1 до N, стоят в кругу. Они начинают играть в считалку на выбывание, где каждый K-й по счёту человек выбывает...
vanyadrachuk2004
16.01.2021 14:59
Даны натуральные числа от 20 до 50. Напечатать те из них, которые делятся на 3, но не делятся на 5. язык программирования Python. при цикла for...
kimyan123makc
20.04.2020 07:18
Почему возникает необходимость добать таблицы в документ...
ZKRMT
04.08.2022 07:55
3. Контрольные во Как сохранить новую информацию из нового окна? 2. Как сохранить изменения в файле? 3. Опишите компиляцию и выполнение программ. 4. Из каких разделов состоит...
alkasalamatina
18.02.2022 20:50
Сделаю ваш ответ лучшим...
NoxchiKent
22.10.2022 22:25
74.спишите предложения,вставляя пропущенные буквы,расставляя недостающие знаки препинания.25...
Fobsliza
25.08.2021 21:38
Найдите периметр жёлтого прямоугольника на рисунке? ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
S,B:string;
i:integer;
Begin
Write('Введите строку: ');ReadLn(S);
For i:= Length(S) downto 1 do
B:=B+S[i];
WriteLn('Перевёрнутая строка: ',B);
End.