Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
А
Английский язык
Х
Химия
Э
Экономика
П
Право
И
Информатика
У
Українська мова
Қ
Қазақ тiлi
О
ОБЖ
Н
Немецкий язык
Б
Беларуская мова
У
Українська література
М
Музыка
П
Психология
А
Алгебра
Л
Литература
Б
Биология
М
МХК
О
Окружающий мир
О
Обществознание
И
История
Г
Геометрия
Ф
Французский язык
Ф
Физика
Д
Другие предметы
Р
Русский язык
Г
География
Показать больше
Показать меньше
noname1710
10.10.2020 05:15 •
Информатика
Паскаль дана строка, состоящая ровно из двух слов, разделенных пробелом. переставьте эти слова местами. результат запишите в строку и выведите получившуюся строку. при решении этой нельзя пользоваться циклами и инструкцией if.
Показать ответ
Ответ:
nastyusha19032002
08.10.2020 04:31
// PascalABC.NET 3.3.5, сборка 1636 от 10.03.2018
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString.ToWords.Reverse; s.Println
end.
0,0
(0 оценок)
Ответ:
fox359
08.10.2020 04:31
Var s, s1, s2, probel: string;
dlina, probelPos: integer;
begin
readln(s);
probel := ' ';
probelPos := pos(probel, stroka);
dlina = length(s);
s1 := copy(s, 1, probelPos-1);
s2 := copy(s, probelPos+1, dlina);
s := s2 + probel + s1;
writeln(s);
end.
0,0
(0 оценок)
Популярные вопросы: Информатика
LORDI9999
22.08.2020 15:24
Суретті түзету дегеніміз не...
1234567890640
05.08.2022 07:54
Даны устройства : оперативная память, кэш-память, флэш-память жёсткий диск. запишите номера устройств в порядке возрастания их быстродействия...
Аленчік
27.05.2021 15:14
В некоторой стране автомобильный номер длиной 6 символов составляют из заглавных букв (задействовано 30 различных букв) и любых десятичных цифр в любом порядке. Каждый такой...
insaf1282
20.11.2020 18:40
Залежно від розміру суми, розмір податку з неї розраховується за такою схемою:якщо сума не перевищує деяку величину а, то податок не вираховується. якщо сума більша за а,...
thomsonrubi
16.08.2020 11:24
Jobs for students. 1. not only do students at central study and have fun, but a large number of students work throughout summer and winter breaks. 2. there are many different...
ЮляКіска
16.08.2020 11:24
связи частей в многочленном сложноподчиненном предложении...
Змей24
16.08.2020 11:24
Окислительно-восстоновительная реакция,решать с метода электронного , so3+p-- p2o5+so2...
katetolstoshev2
16.08.2020 11:24
Что смешно а что грустно в камеди ревезор?...
atas2
16.08.2020 11:24
Как решить это , , если можно напишите с объяснением. значение выражения a+9-14 равно нулю, если a= ? нужно найти значение a....
mastheadchan1
16.08.2020 11:24
Найди и выпиши три группы родственных слов.випиши формы одного и того же слова...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
// Внимание! Если программа не работает, обновите версию!
begin
var s:=ReadlnString.ToWords.Reverse; s.Println
end.
dlina, probelPos: integer;
begin
readln(s);
probel := ' ';
probelPos := pos(probel, stroka);
dlina = length(s);
s1 := copy(s, 1, probelPos-1);
s2 := copy(s, probelPos+1, dlina);
s := s2 + probel + s1;
writeln(s);
end.