Войти
Регистрация
Спроси ai-bota
В
Все
М
Математика
О
ОБЖ
У
Українська мова
Д
Другие предметы
Х
Химия
М
Музыка
Н
Немецкий язык
Б
Беларуская мова
Э
Экономика
Ф
Физика
Б
Биология
О
Окружающий мир
Р
Русский язык
У
Українська література
Ф
Французский язык
П
Психология
А
Алгебра
О
Обществознание
М
МХК
В
Видео-ответы
Г
География
П
Право
Г
Геометрия
А
Английский язык
И
Информатика
Қ
Қазақ тiлi
Л
Литература
И
История
Показать больше
Показать меньше
АннаКлимчук1997
08.10.2020 04:13 •
Информатика
Паскаль дана строка, состоящая ровно из двух слов, разделенных пробелом. переставьте эти слова местами. результат запишите в строку и выведите получившуюся строку. при решении этой нельзя пользоваться циклами и инструкцией if.
Показать ответ
Ответ:
foximmortal
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 оценок)
Ответ:
vik5611
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 оценок)
Популярные вопросы: Информатика
Natalivizer
18.12.2022 01:35
Написать программу с постусловием, которая будет выводить на экран символ * (х: =*, х: char) до тех пор, пока с клавиатуры не будет введен 0....
demon998
18.12.2022 01:35
Если не сложно конечно. напишите программу, которая вводит натуральное число n и выводит первые n четных натуральных чисел....
leonovapodkina
02.01.2021 08:03
11. Повторение определенной последовательности действий задан-ное количество раз:а) программаb) циклический алгоритмс) ветвящийся алгоритмd) линейный алгоритм...
diankaZe
09.07.2021 13:06
4 . Что будет нарисовано после выполнения Чертёжником алгоритма? На бесконечном поле имеется вертикальная стена. Длина стены неизвестна. Робот может находиться в любой клетке...
agnesa9890
21.11.2020 21:37
Дан двумерный массив(4*5) написать программу, которая определит кол-во четных элементов двумерного массива. заполонить с клавиатуры....
bulavka8
05.07.2020 20:39
Решите уравнения: 1) 4-6(x+2)=3-5x 2) (5x++14)=9 3) 2.7+3y=9(y-2.1) 4) 7x+3=3(2x-1)+x 5)1.8(1-2x)= 7.8-(3.6x+6)...
MaxymMelehovets
05.07.2020 20:39
найдите площадь заштрихованной фигуры.какая часть квадрата вырезана?...
Выгуки
05.07.2020 20:39
Впаскале запросить с клавиатуры 3 стороны треугольника и по ним определить, является ли он прямоугольным, сообщение вывести на экран. подсказка. для каждой стороны применить теорему...
стас482
05.07.2020 20:39
Решите пример с объяснениями: 2+2х2+2: 2...
alenuhaa
05.07.2020 20:39
Установите соответствие между тривиальным названием вещества и его принадлежностью к определённому классу неорганических соединений. буквы могут не использоваться или повторяться....
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и 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.