Дано действительное число R вида nnn.ddd (три цифровых разряда в целой и дробной частях)....

Question

Дано действительное число R вида nnn.ddd (три цифровых разряда в целой и дробной частях). Поменять местами дробную и целую части числа и вывести полученное значение числа.

Answer 1

// 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

Comments

Кроме того по условию задачи необходимо получить ЧИСЛО, а не строку

---

.... и вывести полученное значение числа

---

Не надо свои фантазии причудливые выдавать за условие задачи! 1) в Условии написано, что "дано действительное число R вида nnn.ddd (три цифровых разряда в целой и дробной частях)". И при вводе числа 234.652 получается именно 652.234 - это написано и в тестовом примере, и сейчас еще раз мной проверено непосредственно с текста программы, взятого из ответа. Более того, даже при вводе числа 987654.3210123 было вырезано 654.321 и выведено в виде 321.654

---

2) То, что ПО УСЛОВИЮ нужно получить число - это еще одна Ваша выдумка, показывающая. насколько Вы не понимаете предмет. Число никогда не выводится программой, выводится лишь его изображние в виде символов. И момент, в который число становится таким изображением непринципиален, если только с этим числом не совершаются математические операции.

---

Как итог, Ваше заявление о том, что ответ неверен на самом деле свидетельствует об одном: Вы настолько не разбираетесь в предмете, что даже среди готовых решений неспособны отличить верное от неверного".

---

И еще: если Вы в WDE проверяли, там дыра, расширение .ToString для вещественного числа превращает точку в запятую, поэтому местоположение точки не находится. На будущее: НИКОГДА не пытайтесь, выполнив программу в WDЕ и получив "неверный результат", начинать заявять, что программа неверна: WDE сильно отстает от развития автономных версий.

---

Ваша программы не работает, да еще, оказывается!! не принципиально - на выходе набор символов или число!!!

---

Учите матчасть!

---

1. Читайте СВОЙ вопрос внимательно: "дано действительное число R вида nnn.ddd (три цифровых разряда в целой и дробной частях)." В школьных задачах НИКОГДА не контролируется правильность вводимых данных, если об этом специально не говорится в условии. 2. Если у Вас программа не работает, значит Вы запустили её в некой версии, более ранней, чем указанная. Это называется просто: переваливать с больной головы на здоровую.