Войти
Регистрация
Спроси ai-bota
В
Все
Х
Химия
В
Видео-ответы
А
Алгебра
Г
Геометрия
О
ОБЖ
Д
Другие предметы
У
Українська література
Р
Русский язык
Б
Беларуская мова
У
Українська мова
Э
Экономика
Ф
Физика
М
Математика
Ф
Французский язык
Г
География
И
Информатика
М
МХК
О
Окружающий мир
П
Психология
Н
Немецкий язык
О
Обществознание
П
Право
И
История
М
Музыка
Л
Литература
Қ
Қазақ тiлi
Б
Биология
А
Английский язык
Показать больше
Показать меньше
9Тимур1111111121
25.01.2022 17:45 •
Информатика
Нужна в паскале запросить у пользователя строку s, сформировать из нее строку s1, переставив символы в строке s местами: первый с последним, второй с предпоследним и т.д. вывести на чистый экран строки s и s1, рядом их длину.
Ответ:
margusqw
16.08.2020 16:17
Поскольку в Windows-приложениях нет понятия "чистый экран", ввод/вывод был направлен в DOS-окно
// PascalABC.NET 3.3, сборка 1607 от 31.12.2017
// Внимание! Если программа не работает, обновите версию!
uses Crt;
begin
var s:=ReadlnString('Введите строку');
ClrScr;
var L:=s.Length; Println(s,L);
var s1:=s.Inverse; Println(s1,L)
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
dzyskristina503
02.04.2022 05:55
Какое из четырех чисел является наименьшим? 1110101 в двоичной сис-ме 72 в шестнадцатеричной 164 в восьмиричной 115 в десятиричной...
kolya14445
12.04.2021 03:26
1. из-за непогоды были отменены рейсы самолетов. ненадолго проглянуло солнце: на n часов и м минут. сколько самолетов успеет вылететь за это время, если на взлетной...
cherenko85
12.04.2021 03:26
Буду вам 1. перед погрузкой в грузовой вагон на перроне находится nb и nm малых коробок с изделиями, которые упакованы соответственно по xb штук в больших коробках и...
Anastasia888888
28.04.2020 20:46
Составьте программу которая позволяет удалить слово t из строки s. строка s и слово t, которое надо удалить, вводятся с клавиатуры...
Riiiiiii
07.01.2022 04:03
70 ! надо написать программу на языке паскаль, которая вычисляет сумму: а) первых n натуральных чисел; б) квадратов первых n натуральных чисел; в) всех чётных чисел...
DIANA89320
28.04.2020 20:46
Составить программу которая формирует массив из 15 случайных целых чисел из отрезка от -10 до 10. на экран вывести исходный массив и найденный результат. а) найти среднее...
Dashaandreevna1982
14.04.2023 21:27
Снег (таять) и (таять).жителям лесных подвалов(приходиться):...
Mashavicks
14.04.2023 21:27
Найти площадь полной поверхности прямоугольного параллелепипеда, в основании которого лежит квадрат, если диагональ параллелепипеда равняется 12см и наклонена к площади...
2810vika
14.04.2023 21:27
Жиктик жалгауына жекеше копше турине мысал келтиртп мысал келтирип бериндерш...
moon455808
14.04.2023 21:27
(1 5/6+3/5)*24 решить (должно получиться 58,4)...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
// PascalABC.NET 3.3, сборка 1607 от 31.12.2017
// Внимание! Если программа не работает, обновите версию!
uses Crt;
begin
var s:=ReadlnString('Введите строку');
ClrScr;
var L:=s.Length; Println(s,L);
var s1:=s.Inverse; Println(s1,L)
end.