Войти
Регистрация
Спроси ai-bota
В
Все
Б
Биология
Б
Беларуская мова
У
Українська мова
А
Алгебра
Р
Русский язык
О
ОБЖ
И
История
Ф
Физика
Қ
Қазақ тiлi
О
Окружающий мир
Э
Экономика
Н
Немецкий язык
Х
Химия
П
Право
П
Психология
Д
Другие предметы
Л
Литература
Г
География
Ф
Французский язык
М
Математика
М
Музыка
А
Английский язык
М
МХК
У
Українська література
И
Информатика
О
Обществознание
Г
Геометрия
Показать больше
Показать меньше
AndreiBrazhnikov1
07.09.2021 22:06 •
Информатика
Дано действительное число r вида nnn.ddd (три цифровых разряда в целой и дробной частях). поменять местами дробную и целую части числа и вывести полученное значение числа.
Показать ответ
Ответ:
vladikn2016
23.09.2020 10:15
// PascalABC.NET 3.1, сборка 1198 от 11.03.2016
begin
var s:=ReadReal('r=').ToString;
var p:=Pos('.',s);
Writeln(Copy(s,p+1,3)+'.'+Copy(s,p-3,3))
end.
Тестовое решение:
r= 234.652
652.234
0,0
(0 оценок)
Популярные вопросы: Информатика
gamerallgames3457643
03.02.2022 19:43
Документ объемом 5 Мбайт можно передать с одного компьютера на другой двумя А) Сжать архиватором, передать архив по каналу связи, распаковать. Б) Передать по каналу связи...
Nadezhdakarpov1
11.07.2020 13:36
3.Укажите максимальное Х, для которого истинно выражение (X 2))4.Укажите максимальное Х, для которого истинно выражение (X 3))5.Укажите максимальное Х, для которого истинно...
Аллюрорка
18.11.2022 02:14
Тема: Реализация циклических алгоритмов в среде программирования. 1)Найти сумму от 13 до 27. 2) Найти произведение чисел от 11 до Р 3) Написать фразу циклические алгоритмы...
nastyaignatova3
21.05.2022 05:41
Як у стовпець А можна ввести послідовний ряд натуральних чисел? Вкажи одну або кілька відповідей А) у клітинку А1 ввести перше число, у клітинку А2 — формулу =А1+1, виділити...
2017mariana
24.10.2020 12:01
Алгебра логики - это ... СРОЧНО............ ОЧ НАДО........ ПРОШУ...
АшадЕфремова
26.06.2021 01:41
Рисунок разбит на ячейки. Номера ячеек пронумерованы от 0 до 9 по горизонтали и вертикали. Среди ячеек, закрашенных черным цветом, выбери ту, значение суммы номеров для...
karamnovagmai
28.10.2022 12:24
Тема: Реализация циклических алгоритмов в среде программирования. 1) Найти сумму от 13 до 27. 2) Найти произведение чисел от 11 до Р 3) Написать фразу циклические алгоритмы...
172839465
28.10.2020 02:40
Укажите, каким не может быть условие в алгоритме с предусловием для решения следующей задачи (исполнитель Робот): ниже Робота расположен коридор неизвестной длины, необходимо,...
dimonatomp0ce79
25.09.2022 08:26
Чему равно количество информации о неисправности п транзисторов после температурных испытаний партии транзисторов из N штук, выпущенной в один и тот же день, одним и...
nog2018
20.09.2022 13:18
Подскажите , какой в этом задании правильный ответ...
Полный доступ
Позволит учиться лучше и быстрее. Неограниченный доступ к базе и ответам от экспертов и ai-bota
Оформи подписку
О НАС
О нас
Блог
Карьера
Условия пользования
Авторское право
Политика конфиденциальности
Политика использования файлов cookie
Предпочтения cookie-файлов
СООБЩЕСТВО
Сообщество
Для школ
Родителям
Кодекс чести
Правила сообщества
Insights
Стань помощником
ПОМОЩЬ
Зарегистрируйся
Центр помощи
Центр безопасности
Договор о конфиденциальности полученной информации
App
Начни делиться знаниями
Вход
Регистрация
Что ты хочешь узнать?
Спроси ai-бота
begin
var s:=ReadReal('r=').ToString;
var p:=Pos('.',s);
Writeln(Copy(s,p+1,3)+'.'+Copy(s,p-3,3))
end.
Тестовое решение:
r= 234.652
652.234